假设我们有这样的数据:
dta <- data.frame(
group = rep(letters[1:8], each=1000),
x = runif(8000), y=runif(8000)
)
我想为每个组生成一个包含y~x的Lattice图。但是,第一行有a-d组,第二行有e-h。即,我想做相当于
qplot(x=x, y=y, data=dta) + facet_wrap(~ group, nrow=2)
但在莱迪思。做这个的最好方式是什么?
答案 0 :(得分:3)
library(lattice)
xyplot(y ~ x | group, dta, layout=c(4,2), as.table = TRUE)
根据@BenBarnes的建议,as.table = TRUE
保留了方面的顺序。