rでlattice 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)

比較のために：