如何在R语言qplot中为iris数据集的setosa行设置红色？

当然有简单的办法搞定这个需求！你只需要在qplot里借助条件判断来指定颜色映射，就能轻松把Species为"setosa"的点标红。下面是两种实用的实现方式：

方式一：直接在qplot中嵌入颜色判断 #

这种方式最直接，一步到位：

df <- iris
qplot(Species, Petal.Length, data = df, color = ifelse(Species == "setosa", "red", "black")) +
  scale_color_identity()

• ifelse(Species == "setosa", "red", "black")：核心逻辑——当Species是"setosa"时用红色，其他类别用黑色（你也可以把黑色换成其他你喜欢的默认色）
• scale_color_identity()：这一步很关键，它告诉ggplot2直接使用我们指定的颜色值，而不是自动生成带图例的颜色映射（如果不需要图例的话，这个必须加）

方式二：先给数据集新增颜色列（适合复用场景） #

如果之后还需要用到这个颜色逻辑，先给数据框加个颜色列会更方便：

df <- iris
# 新增颜色列
df$point_color <- ifelse(df$Species == "setosa", "red", "black")
# 绘图时调用这个颜色列
qplot(Species, Petal.Length, data = df, color = point_color) +
  scale_color_identity()

另外提个小建议：尽量用data = df的方式传递数据集，然后直接写列名（比如Species而不是df$Species），这更符合ggplot系列函数的语法规范哦～

内容的提问来源于stack exchange，提问作者WoeIs