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