Displaying 1 result from an estimated 1 matches for "jpgplot".
Did you mean:
pgplot
2009 Jun 26
3
panel.text and saving to pdf
...today <- format(Sys.Date(),"%Y%m%d")
x <- runif(500)
y <- rnorm(500)
foo <- data.frame(x = x, y = y, z = rep(c("a","b"),250))
require(lattice)
xyplot(x~y|z,data=foo)
panel.text(370,470,"silly graph",cex=1.2,font=2)
savePlot(paste(today, "jpgplot",sep="_"),type="jpg") # this plots fine and text is as on the screen
savePlot(paste(today, "pdfplot",sep="_"),type="pdf") # text has moved
pdf(paste(today,"pdfplot2.pdf",sep="_")) # no difference using pdf
xyplot(x~y|z,data...