如何在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)

为了比较: