如何在R中制作格子xyplot（）灰度？

Question

最簡單的方法是制作這種情節灰度（或許可能是黑白），而不是默認的多色：

xyplot(y1 + y2 ~ x, mydata, auto.key=TRUE)

我已經看過有關創建新圖形設備或更改所有繪圖選項的討論 ，但是我是否可以在xyplot()函數本身中包含一個選項，將繪圖轉換為灰度？

Answer 1

library(lattice)
bwtheme <- standard.theme("pdf", color=FALSE)
mydata <- data.frame(y1=rnorm(10), y2=rnorm(10), x=1:10)
xyplot(y1 + y2 ~ x, mydata, auto.key=TRUE, par.settings=bwtheme)

為了比較：