Чтобы расширить ответ @Dirk Eddelbuettel, вы можете использовать любую функцию для col
в вызове plot
. Например, это окрашивает x==3
точку в красный цвет, оставляя все остальные черными:
x <- 1:5
plot(x, x, col=ifelse(x==3, "red", "black"))
То же самое касается точечного символа pch
, расширения символа cex
и т. Д.
plot(x, x, col=ifelse(x==3, "red", "black"),
pch=ifelse(x==3, 19, 1), cex=ifelse(x==3, 2, 1))