ggplot2修改图例标签异常：scale_color_manual致图形变灰度

核心问题 #

你遇到的灰度显示问题，本质是**scale_color_manual里指定的Port值（"2"、"3"）和数据slz_soil_Js_march中Port列的实际水平不匹配**。ggplot找不到对应颜色映射，就会用默认的灰度方案替代。

解决步骤 #

1. 确认数据中的Port实际值
   先运行以下代码，查看你的数据里Port列到底包含哪些类别：

   # 查看Port的唯一值
   unique(as.factor(slz_soil_Js_march$Port))
   # 或者查看因子水平（如果Port是因子类型）
   levels(as.factor(slz_soil_Js_march$Port))
   

   从你第一次正常运行的代码来看，数据里的Port应该是"1"和"4"，所以指定"2"、"3"自然无法匹配。

2. 两种修正方案

   • 方案一：如果只是想把图例标签从"1"、"4"改成"2"、"3"，不要修改values的键，而是用labels参数：

     slzsoil_js_plot_march <- ggplot(slz_soil_Js_march, mapping = aes(TIMESTAMP, Js, color = as.factor(Port))) + 
       geom_line() + 
       labs(title = "SLZ La Casita Sensors 1&4") + 
       scale_color_manual(
         name = "Sensor", 
         values = c("1" = "darkblue", "4" = "red"),  # 对应数据里的实际Port值
         labels = c("2", "3")  # 这里修改图例显示的标签
       )
     

   • 方案二：如果确实需要映射"2"、"3"，那得先修改数据里的Port值，确保数据中存在这两个水平，再用对应的颜色映射：

     # 先修改数据中的Port值
     slz_soil_Js_march$Port <- recode(slz_soil_Js_march$Port, "1" = "2", "4" = "3")
     # 再绘图
     slzsoil_js_plot_march <- ggplot(slz_soil_Js_march, mapping = aes(TIMESTAMP, Js, color = as.factor(Port))) + 
       geom_line() + 
       labs(title = "SLZ La Casita Sensors 2&3") + 
       scale_color_manual(name = "Sensor", values = c("2" = "darkblue", "3" = "red"))
     

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