r - 在lattice的xyplot()中部分叠加数据

Question

请重现此代码:

install.packages('lattice')
install.packages('zoo')
require(lattice)
require(zoo)
X <- matrix(runif(25 * 8), ncol = 8)

(其目的只是加载包并创建一个 8 列的矩阵)。

使用zoo可以很容易地创建这样的图:

plot.zoo(X, screen = c(1,1,2,2,3,3,4,4), col = c(1,2))

我怎样才能用lattice的xyplot()函数做同样的事情？

Answer 1

这可以通过 zoo:::xyplot.zoo 完成:如 zoo 包文档中所述，xyplot.zoo 有 xyplot 时间序列对象的方法。

那么，对于上述问题，可以使用:

xyplot(as.zoo(X), screen = c(1,1,2,2,3,3,4,4), col = c(1,2))

生成一个trellis对象，就像lattice中一样，使用screen参数选择所需的布局。