DATA MINING
Desktop Survival Guide by Graham Williams |
|||||
pdf("graphics/rplot-bwplot.pdf") mydata <- data.frame(Y = rnorm(3*1000), INDFACT =rep(c("A", "B", "C"), each=1000), CLUSFACT=factor(rep(c("M","F"), 1500))) library(lattice) trellis.device(new=FALSE, col=FALSE) bwplot(Y ~ INDFACT | CLUSFACT, data=mydata, layout=c(2,1)) dev.off() |