如何为ggplot2的geom_line()添加图例？代码执行报错求助

你的代码报错且无法生成图例的核心原因有两个：

1. 把color直接赋值而非映射到变量（放在aes()外），ggplot无法识别图例关联
2. 使用宽格式数据多次调用geom_line，不符合ggplot的映射逻辑

修正步骤 #

1. 转换数据为长格式

ggplot2更适合处理长格式数据，用tidyr::pivot_longer把多列DO数据转成"变量名-数值"的结构：

# 先为数据添加x轴列（确保和观测数匹配）
rawData$x <- 1:nrow(rawData)

# 转长格式
long_data <- tidyr::pivot_longer(
  rawData,
  cols = c(DO1, DO2, Controlling.DO),  # 指定要转换的列
  names_to = "DO_Type",  # 新的分组列名
  values_to = "DO_Value"  # 新的数值列名
)

2. 重新编写绘图代码

只需要一次geom_line，将color映射到长格式的分组变量，自动生成图例：

all_plot <- ggplot(long_data, aes(x = x)) +
  geom_line(aes(y = DO_Value, color = DO_Type)) +
  ggtitle("Plot of Controlling DO changing between DO1 and DO2") +
  labs(
    x = "No of Observations",
    y = "DO(Dissolved Oxygen)",
    color = "DO Type"  # 图例标题
  ) +
  scale_color_manual(
    values = c(
      'DO1' = 'darkblue',
      'DO2' = 'red',
      'Controlling.DO' = 'green'
    )
  )

all_plot

原代码错误解析 #

原代码中geom_line(aes(y = DO1), color = 'DO1')里的color='DO1'是直接设置线条颜色，不是映射到数据变量，ggplot无法为这种硬编码的颜色创建图例，同时还会因为映射逻辑冲突导致转换grob时出错。

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