ggplot绘制分组点图无颜色显示问题求助

你的代码里犯了一个常见的新手错误：geom_point()默认使用color参数控制点的颜色，而非fill。普通的点形状（比如默认圆形）没有填充属性，所以你设置的fill映射和scale_fill_manual不会生效，导致图呈现黑白效果。

修正后的代码如下：

EnvDF <- data.frame(variable = rep(c("CHL", "EZ", "NO3", "PHOS", "SSS", "SST"), each = 12),
                 month = rep(1:12, times = 6),
                 value = c(monthly_avCHL, monthly_avEZ, monthly_avNO3, monthly_avPHOS, monthly_avSSS, monthly_avSST))

ggplot(EnvDF, aes(x = month, y = value, color = variable)) +
  geom_point(position = position_dodge(width = 0.3)) +
  scale_color_manual(values = c("red", "blue", "green", "orange", "purple", "pink")) +
  labs(x = "月份", y = "平均值") +
  ggtitle("环境变量月平均值") +
  theme_bw()

关键改动：

• 将aes()中的fill = variable改为color = variable
• 将scale_fill_manual()改为scale_color_manual()
• 同步将图表标签与标题替换为中文表述

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