基本图中点的颜色由另一列中的值决定

Question

我有一个图，其中当前圆圈 (pch=19) 的颜色为红色（当条件列中的值 >4.5 时）和黑色（如果值缺失 (NA)）。

points(bb$Year,bb$Tot,col=ifelse(bb$rate<4.5|is.na(bb$rate),'black','red'),pch=19,cex=1.7)

当值 <=4.5 时，我需要第三种颜色，或者更好的是一个空心圆 (pch=21)。

可能很简单，但对我来说有点棘手。

Answer 1

您需要创建一个编码符号和颜色的索引值：

x <- 0:10
y <- (5 - x)^2
z <- 0:10
z[c(3, 9)] <- NA    # Conditioning variable
sym <- c(1, 16, 16)
clr <- c("black", "black", "red")
idx <- ifelse(is.na(z), 1, ifelse(z <= 4.5, 2, 3))
plot(x, y, pch=sym[idx], col=clr[idx])

基本图中点的颜色由另一列中的值决定

Colors of points in a base plot conditioned by values in another column

plot

r