Какой самый простой способ сделать черно-белый график (или, возможно, черно-белый) вместо многоцветного по умолчанию:
xyplot(y1 + y2 ~ x, mydata, auto.key=TRUE)
Я видел обсуждение создания новых графических устройств или изменения параметров для всех графиков , но есть ли вариант, который я могу включить, возможно, в саму функцию xyplot(), которая преобразует график в градации серого
xyplot()
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)
Для сравнения: