Hello and Happy New Year to all R-Users !!! I would like to plot a lattice graph with a logarthmic y axis and add two reference lines that is : ref<-c(0.0070, 0.0096) graph1<-xyplot(data$y1 ~ as.numeric(strptime(data$x1, format="%Y-%m-%d %H:%M:%S")) | as.character(data$Code), list(y = list(log = T)), xlab="X'", ylab="Y", panel = function(...) { panel.xyplot(..., type="p", pch=20) panel.abline(h=ref, col="red") } ) print(graph1) With this script, no reference lines are plotted. But if I use list(y = list(log = F)), that is a linear scale, it works. Could you please explain me the problem (and help me to solve it) ? Thanks in advance, Ptit Bleu. -- View this message in context: http://www.nabble.com/Problem-between-panel.abline-and-log-scales-%28lattice%29-tp21411642p21411642.html Sent from the R help mailing list archive at Nabble.com.
Deepayan Sarkar
2009-Jan-19 08:40 UTC
[R] Problem between panel.abline and log scales (lattice)
On 1/12/09, Ptit_Bleu <ptit_bleu at yahoo.fr> wrote:> > Hello and Happy New Year to all R-Users !!! > > I would like to plot a lattice graph with a logarthmic y axis and add two > reference lines that is : > > ref<-c(0.0070, 0.0096) > > graph1<-xyplot(data$y1 ~ as.numeric(strptime(data$x1, format="%Y-%m-%d > %H:%M:%S")) | as.character(data$Code), > list(y = list(log = T)), > xlab="X'", ylab="Y", > panel = function(...) { > panel.xyplot(..., type="p", pch=20) > panel.abline(h=ref, col="red") > } > > ) > print(graph1) > > > With this script, no reference lines are plotted. > But if I use list(y = list(log = F)), that is a linear scale, it works. > > Could you please explain me the problem (and help me to solve it) ?xyplot(y ~ x, scales=list(log=TRUE)) is basically equivalent to xyplot(log10(y) ~ log10(x)) (plus some changes to axis annotation). You will probably need to use panel.curve instead of panel.abline in your panel function. -Deepayan