r - 相当于Lattice中的facet_wrap

说我们有一些像这样的数据：

dta <- data.frame(
   group = rep(letters[1:8], each=1000),
   x = runif(8000), y=runif(8000)
)

我想为每个组生成一个包含y〜x的格子图。但是，第一行有a-d组，第二行有e-h组。即，我想做相当于

 qplot(x=x, y=y, data=dta) + facet_wrap(~ group, nrow=2)

但是在莱迪思。做这个的最好方式是什么？

最佳答案

library(lattice)
xyplot(y ~ x | group, dta, layout=c(4,2), as.table = TRUE)

如@BenBarnes所建议，as.table = TRUE保持构面的顺序。