Re: [R] Missing text in lattice key legend
Awesome, thanks! On Mon, Oct 11, 2021 at 2:19 PM Deepayan Sarkar wrote: > > On Mon, Oct 11, 2021 at 5:17 PM Luigi Marongiu > wrote: > > > > Hello, > > I am drawing some data with lattice using: > > ``` > > library(lattice) > > COLS = c("gold", "forestgreen", "darkslategray3", "purple") > > xyplot(Value ~ Concentration, > >group = Substance, data = inf_avg, > >pch = 16, cex = 1.2, type = "b", > >xlab=expression(bold(paste("Concentration (", mu, "M)"))), > >ylab=expression(bold("Infection rate")), > >col=COLS, > >scales = list(x = list(log = 10, at=c(unique(inf_avg$Concentration)) > > ) > > ), > >key = list(space="top", columns=4, col = "black", > >points=list(pch=c(16, 16, 16, 16), > >col=COLS, > >text=list(c("6-PN", "8-PN", "IX", "XN") > > ) > >) > > ), > >panel = function(x,y) { > > panel.xyplot(x,y) > > errbar() > >} > > ) > > ``` > > It all works but the legend only shows the colored dots, there is no > > text. Is it something missing from the syntax? > > Your text component is nested inside the points component. I think you > want it outside, e.g., > > xyplot(1 ~ 1, >key = list(space="top", columns=4, col = "black", > points=list(pch=c(16, 16, 16, 16), > col=COLS), > text=list(c("6-PN", "8-PN", "IX", "XN")) > )) > > Best, > -Deepayan > > > Thanks > > > > -- > > Best regards, > > Luigi > > > > __ > > R-help@r-project.org mailing list -- To UNSUBSCRIBE and more, see > > https://stat.ethz.ch/mailman/listinfo/r-help > > PLEASE do read the posting guide http://www.R-project.org/posting-guide.html > > and provide commented, minimal, self-contained, reproducible code. -- Best regards, Luigi __ R-help@r-project.org mailing list -- To UNSUBSCRIBE and more, see https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.
Re: [R] Missing text in lattice key legend
On Mon, Oct 11, 2021 at 5:17 PM Luigi Marongiu wrote: > > Hello, > I am drawing some data with lattice using: > ``` > library(lattice) > COLS = c("gold", "forestgreen", "darkslategray3", "purple") > xyplot(Value ~ Concentration, >group = Substance, data = inf_avg, >pch = 16, cex = 1.2, type = "b", >xlab=expression(bold(paste("Concentration (", mu, "M)"))), >ylab=expression(bold("Infection rate")), >col=COLS, >scales = list(x = list(log = 10, at=c(unique(inf_avg$Concentration)) > ) > ), >key = list(space="top", columns=4, col = "black", >points=list(pch=c(16, 16, 16, 16), >col=COLS, >text=list(c("6-PN", "8-PN", "IX", "XN") > ) >) > ), >panel = function(x,y) { > panel.xyplot(x,y) > errbar() >} > ) > ``` > It all works but the legend only shows the colored dots, there is no > text. Is it something missing from the syntax? Your text component is nested inside the points component. I think you want it outside, e.g., xyplot(1 ~ 1, key = list(space="top", columns=4, col = "black", points=list(pch=c(16, 16, 16, 16), col=COLS), text=list(c("6-PN", "8-PN", "IX", "XN")) )) Best, -Deepayan > Thanks > > -- > Best regards, > Luigi > > __ > R-help@r-project.org mailing list -- To UNSUBSCRIBE and more, see > https://stat.ethz.ch/mailman/listinfo/r-help > PLEASE do read the posting guide http://www.R-project.org/posting-guide.html > and provide commented, minimal, self-contained, reproducible code. __ R-help@r-project.org mailing list -- To UNSUBSCRIBE and more, see https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.
[R] Missing text in lattice key legend
Hello, I am drawing some data with lattice using: ``` library(lattice) COLS = c("gold", "forestgreen", "darkslategray3", "purple") xyplot(Value ~ Concentration, group = Substance, data = inf_avg, pch = 16, cex = 1.2, type = "b", xlab=expression(bold(paste("Concentration (", mu, "M)"))), ylab=expression(bold("Infection rate")), col=COLS, scales = list(x = list(log = 10, at=c(unique(inf_avg$Concentration)) ) ), key = list(space="top", columns=4, col = "black", points=list(pch=c(16, 16, 16, 16), col=COLS, text=list(c("6-PN", "8-PN", "IX", "XN") ) ) ), panel = function(x,y) { panel.xyplot(x,y) errbar() } ) ``` It all works but the legend only shows the colored dots, there is no text. Is it something missing from the syntax? Thanks -- Best regards, Luigi __ R-help@r-project.org mailing list -- To UNSUBSCRIBE and more, see https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.