R-package格子：使用面板參數時，按顏色不起作用

Question

我想用線條繪製xyplot。舉個例子，我使用虹膜數據，我知道實際的情節並沒有真正意義:)

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) 
}