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

进行比较：