为各线条x、y值不同的ggplot2图形添加图例

嘿，我明白你的困扰——你给每个实验条件都指定了颜色，但因为不同条件对应不同的x轴值，直接用宽格式数据绘图的话，ggplot没法自动识别分组生成图例对吧？咱们一步步来搞定它：

1. 先把数据改成ggplot喜欢的长格式 #

ggplot的分组逻辑依赖每个观测都有明确的分组标识、x值和y值，你的宽格式数据（列是e0、e200、o0这类）得先转成长格式，同时给每个条件匹配对应的x轴数值。

假设：

• e开头的条件（e0、e200）对应的x轴值是0和200
• o开头的条件（o0、o50、o200）对应的x轴值是0、50、200

用tidyverse工具处理数据：

library(tidyverse)

# 先做一个条件和x轴值的映射表
x_mapping <- tibble(
  condition = c("e0", "e200", "o0", "o50", "o200"),
  x_value = c(0, 200, 0, 50, 200)
)

# 把宽数据转成长格式，再合并x轴值
df_long <- df %>%
  rownames_to_column(var = "sample") %>%  # 如果你的行是有实际意义的（比如时间点/批次），把sample改成对应列名
  pivot_longer(cols = -sample, names_to = "condition", values_to = "y_value") %>%
  left_join(x_mapping, by = "condition")

2. 绘图并生成匹配的图例 #

现在数据格式对了，ggplot就能轻松按condition分组，自动生成图例，同时每个线条用对应的x轴值：

ggplot(df_long, aes(x = x_value, y = y_value, color = condition, group = condition)) +
  geom_line(linewidth = 1) +
  geom_point(size = 2) +  # 可选，加数据点更直观
  scale_color_manual(
    name = "实验条件",  # 自定义图例标题
    values = c(
      "e0" = "steelblue", "e200" = "darkblue",
      "o0" = "firebrick", "o50" = "darkred", "o200" = "orange"
    )  # 这里填你预先设定的颜色，和条件一一对应
  ) +
  labs(x = "X轴数值", y = "Y轴测量值") +
  theme_minimal()

3. 额外需求：显示双x轴（上下各一个） #

如果你想把e系列和o系列的x轴分别放在上下两侧，可以用sec_axis实现：

ggplot(df_long, aes(x = x_value, y = y_value, color = condition, group = condition)) +
  geom_line(linewidth = 1) +
  geom_point(size = 2) +
  scale_color_manual(
    name = "实验条件",
    values = c("e0" = "steelblue", "e200" = "darkblue", "o0" = "firebrick", "o50" = "darkred", "o200" = "orange")
  ) +
  scale_x_continuous(
    name = "E系列X轴",
    sec.axis = sec_axis(~., name = "O系列X轴")  # 如果两个x轴范围不同，可以加转换逻辑，比如~.*1.2，这里假设范围一致
  ) +
  labs(y = "Y轴测量值") +
  theme_minimal()

核心要点 #

• 长格式是关键：只有把每个观测的分组、x、y值都明确出来，ggplot才能正确识别线条分组和图例对应关系。
• 手动指定颜色时，scale_color_manual里的颜色要和condition的取值完全对应，这样图例颜色和线条颜色才会匹配。

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