R 将数据帧列馈送至xyplot面板功能

R 将数据帧列馈送至xyplot面板功能,r,plot,lattice,R,Plot,Lattice,我在数据帧上使用xyplot,希望向面板函数提供的数据不是(x,y,…)参数,而是数据帧的某个附加列(如下面示例中的k): 库(晶格) mydata这就是有用的(但有些模糊的)subscripts参数的作用。根据?xyplot中“panel”参数的描述: […]面板功能可以 将“下标”作为正式参数。在这两种情况下 传递给面板函数的“subscripts”参数是 中该面板的“x”和“y”数据索引 原始“数据”,然后再考虑 “子集”参数 换句话说,名为“subscripts”的正式参数将包含data

我在数据帧上使用xyplot,希望向面板函数提供的数据不是(x,y,…)参数,而是数据帧的某个附加列(如下面示例中的k):

库(晶格)
mydata这就是有用的(但有些模糊的)
subscripts
参数的作用。根据
?xyplot
中“panel”参数的描述:

[…]面板功能可以 将“下标”作为正式参数。在这两种情况下 传递给面板函数的“subscripts”参数是 中该面板的“x”和“y”数据索引 原始“数据”,然后再考虑 “子集”参数

换句话说,名为“subscripts”的正式参数将包含
data
参数中的行号,这些行号与当前面板中绘制的数据相对应——这正是选择
k
-值的所需子集所需的

在您的情况下,请执行以下操作:

xyplot(yyy ~ xxx | uuu, data = mydata, K = mydata$k, pch=16, 
       panel = function(x,y,K, ..., subscripts){
                   n <- x * K[subscripts]
                   panel.xyplot(n,y,...)
               })
xyplot(yyy~xxx | uuu,data=mydata,K=mydata$K,pch=16,
面板=功能(x,y,K,…,下标){
N
xyplot(yyy ~ xxx | uuu, data = mydata, K = mydata$k, pch=16, 
       panel = function(x,y,K, ..., subscripts){
                   n <- x * K[subscripts]
                   panel.xyplot(n,y,...)
               })