Revision 198ccf57161e022190640581a9a9fb09b78874ae authored by Deepayan Sarkar on 04 November 2018, 11:50:03 UTC, committed by cran-robot on 04 November 2018, 11:50:03 UTC
1 parent 8786f33
dates.R
postscript("date.ps")
library(lattice)
## POSIXt handling
y <- Sys.time() + 10000 * 1:100
x <- rnorm(100)
b <- gl(3,1,100)
xyplot(y ~ x | b)
xyplot(y ~ x | b, scales = list(relation = "free", rot = 0))
xyplot(y ~ x | b, scales = "sliced")
## Date handling
dat <-
data.frame(a = 1:10,
b = seq(as.Date("2003/1/1"), as.Date("2003/1/10"), by="day"))
xyplot(a~b, dat)
xyplot(a~b, dat, scales=list(x=list(at=dat$b)))
dev.off()
![swh spinner](/static/img/swh-spinner.gif)
Computing file changes ...