r - Latticeplot 中的一些奇怪的东西

Question

我的笔记本电脑的基本信息:

SO: Windows 7 x64
R version 3.0.2 (2013-09-25) -- "Frisbee Sailing"

问题:

当我运行以下代码时:

x <- rnorm (100)
z <- z + rnorm(100)
f <- gl(2,50,labels =c("Groups 1" , "Groups 2"))
xyplot (z ~ x | f,
    panel = function (x, z, ...) {
      panel.xyplot(x,z, ...)
      panel.abline(h = median(z),
                   lty=2
                   )
    })

我得到的是控制台上没有错误，但图表也没有，而不是图表收到两个空图表框，其中包含此错误:

 "error using packet 2, argument "z" in missing, with no defaults"

但在环境中“z”存在且有效!

如果我按预期使用 y 而不是 z 运行脚本，则会绘制两个图形并排绘制(代码有效)。这里发生了什么？

Answer 1

面板函数通过坐标 x 和 y，来自符号 y ~ x。因此，您根据这些参数而不是传递给这些参数的您自己的数据对象的名称来编写面板函数。然后就可以了:

x <- rnorm (100)
z <- x + rnorm(100)
f <- gl(2,50,labels =c("Groups 1" , "Groups 2"))
df <- data.frame(x = x, z = z, f = f) ## I prefer objects in data frames
xyplot (z ~ x | f, data = df,
    panel = function (x, y, ...) {
      panel.xyplot(x, y, ...)
      panel.abline(h = median(y),
                   lty=2
                   )
    })