Làm thế nào để làm cho lưới xyplot() thang độ xám trong R?

Question

cách đơn giản nhất để làm chỉ cốt truyện này màu xám (hoặc có lẽ màu đen và trắng) chứ không phải là mặc định nhiều màu là gì:

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

Tôi đã nhìn thấy discussion of creating new graphics devices or changing options for all plots, nhưng là có một lựa chọn mà tôi có thể bao gồm có lẽ trong chính hàm xyplot() sẽ chuyển đổi cốt truyện thành thang độ xám?

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) 

Để so sánh: