R lattice包中的panel函数参数传输的一个问题

R语言lattice包可以自己定制panel函数。当使用高级函数（例如xyplot，levelplot）绘图时，会调用相应的panel函数来给每个panel（面板）绘图。
最近发现不同的函数传将参数输给面板函数的方式有所不同。

首先来看看xyplot。

library(lattice)
# 这里定义一个简单的panel函数，打印传输进来的变量
myPanel <- function(x, y, subscripts, ...) {
panel.xyplot(x, y, ...)
cat('调用myPanel:n')
cat('x: ', x, 'n')
cat('y: ', y, 'n')
cat('subscripts: ', subscripts, 'nn')
}
data <- data.frame(x = 1:24, y = 1:24, g = factor(rep(1:3, 8)))
xyplot(x ~ y | g, data = data, aspect=1, layout=c(3, 1),
panel=myPanel)

结果：

## 调用myPanel:
## x:
1 4 7 10 13 16 19 22 
## y:
1 4 7 10 13 16 19 22 
## subscripts:
1 4 7 10 13 16 19 22 
## 
## 调用myPanel:
## x:
2 5 8 11 14 17 20 23 
## y:
2 5 8 11 14 17 20 23 
## subscripts:
2 5 8 11 14 17 20 23 
## 
## 调用myPanel:
## x:
3 6 9 12 15 18 21 24 
## y:
3 6 9 12 15 18 21 24 
## subscripts:
3 6 9 12 15 18 21 24

可见，当xyplot每次调用myPanel时，将原始data数据框中24行数据拆成了3份，每次传输一份给myPanel函数。其中subscripts是每份数据在原始数据中对应的编号。
下面来看看levelplot。我们写个类似的例子。

myPanel <- function(x, y, z, subscripts, ...) {
panel.levelplot(x, y, z, subscripts, ...)
cat('调用myPanel:n')
cat('x: ', x, 'n')
cat('y: ', y, 'n')
cat('z: ', z, 'n')
cat('subscripts: ', subscripts, 'nn')
}
data <- data.frame(x = 1:24, y = 1:24, z = 1 : 24,
g = factor(rep(1:3, 8)))
levelplot(z~x*y | g, data = data, aspect=1, layout=c(3, 1),
panel=myPanel)

结果：

## 调用myPanel:
## x:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 
## y:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 
## z:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 
## subscripts:
1 4 7 10 13 16 19 22 
## 
## 调用myPanel:
## x:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 
## y:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 
## z:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 
## subscripts:
2 5 8 11 14 17 20 23 
## 
## 调用myPanel:
## x:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 
## y:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 
## z:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 
## subscripts:
3 6 9 12 15 18 21 24

我们发现，levelplot每次传输给myPanel中的x,y,z都是原始data中所有的数据，只是subscripts中保存了每次的分组信息。

如果自己写panel函数，这些行为需要注意一下。

此外需要注意，默认的panel函数中，panel.xyplot函数没有参数subscripts，而panel.levelplot有这个参数。这与上面分析的问题是一致的。

最后

以上就是善良荷花为你收集整理的R lattice包中的panel函数参数传输的一个问题的全部内容，希望文章能够帮你解决R lattice包中的panel函数参数传输的一个问题所遇到的程序开发问题。

如果觉得靠谱客网站的内容还不错，欢迎将靠谱客网站推荐给程序员好友。