如何更改 R 散点图上的某些点？ [复制]

Question

下面的 R 脚本给出了一个散点图。但是，该数据集中的 9 个观测值的 age 正好在 80 岁左右。
我想把这9个点改成红色圆圈。我该怎么做？

library(ISwR)
age <- juul[ ,1]
igf1 <- juul[ ,4]
plot(age, igf1, pch = 15, col = "blue")

Answer 1

正如lebastnok 建议的那样，您可以使用ifelse 向量为每个点选择一种不同的颜色/形状。

x <- rnorm(50)
y <- rnorm(50)
plot(x, y, 
     col=ifelse(x<0, 'blue', 'red'),
     pch=ifelse(y<0, 15, 21))

在你的情况下，我猜：

library(ISwR)
age <- juul[ ,1]
igf1 <- juul[ ,4]
plot(age, igf1, pch=15, col=ifelse(age < 80, "blue", "red"))

应该可以解决问题。