R-package Lattice：使用面板参数时按颜色分组不起作用

Question

我想用线条绘制 xyplot。作为一个例子，我正在使用 iris 数据，我知道实际的情节并没有真正意义:)

library(lattice)

panel.iris <- function(x,y){
    panel.xyplot(x,y)
    panel.lines(x,y)
    }

xyplot(Sepal.Length ~ Sepal.Width| Petal.Width, data = iris, groups= Species, 
auto.key=list(space="right"), panel=panel.iris)

这给了我下图：但我实际上希望它按组着色，就像这样（但添加了行）：我只能在不使用面板参数时实现此目的...有解决办法吗？

非常感谢！！

Answer 1

您需要将 groups 和 subscripts 传递给 panel.xyplot 函数，以便它知道每个点对应的颜色，如下所示：

panel.iris <- function(x,y,groups,subscripts){
  panel.xyplot(x,y,groups=groups, subscripts=subscripts)
  panel.lines (x,y)
}

R-package Lattice：使用面板参数时按颜色分组不起作用

R-package Lattice: group by color doesn't work when using panel argument

plot

r

lattice