基于等级的颜色散点图

Question

我有一个mtcars的散点图，我想知道是否有办法指定对应于最大和最小mpg值的点的颜色。我想问一个更广泛的问题是，有没有办法根据子群分配点颜色，即3个效率最高的绿色汽车和3个效率最低的红色汽车？

plot(mpg~hp, col= "red", data= mtcars)

谢谢你！

Answer 1

你需要传递一个颜色矢量。一旦你知道哪一个是最小/最大，这是非常简单的。另请注意formula的工作原理。您不应该指定data.frame。

with(mtcars, ifelse(mpg %in% c(min(mpg), max(mpg)), yes = "red", no = "black"))

# used directly in plot() because we specified data = mtcars
plot(mpg ~ hp, col = ifelse(mpg %in% c(min(mpg), max(mpg)), "red", "black"), data = mtcars)