下面的R脚本给出了一个散点图。但是,此数据集中的9个观测值有80年的历史age
。
我想将这9点更改为红色圆圈。我该怎么办?
library(ISwR)
age <- juul[ ,1]
igf1 <- juul[ ,4]
plot(age, igf1, pch = 15, col = "blue")
答案 0 :(得分: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"))
应该可以解决问题。