ggplot2中如何移除图例里的竖线分组A/B/C？

最小可复现示例（MWE） #

先模拟你的场景代码：

library(ggplot2)

# 折线图数据
line_data <- ToothGrowth
# 竖线数据（含自定义分组A/B/C和对应颜色）
vline_data <- data.frame(
  x_pos = c(10, 20, 30),
  v_group = c("A", "B", "C"),
  v_color = c("red", "blue", "green")
)

# 出现问题的代码
ggplot(line_data, aes(x = dose, y = len, color = supp)) +
  geom_line(size = 1) +
  geom_vline(data = vline_data, aes(xintercept = x_pos, color = v_group), size = 1) +
  scale_color_manual(
    values = c(VC = "orange", OJ = "purple", A = "red", B = "blue", C = "green")
  )

问题原因 #

• ggplot2的颜色映射是全局关联的：只要任何一个geom的aes()里定义了color映射，对应的分组值就会被纳入颜色标度的水平列表。
• 你在geom_vline的aes()中用了color = v_group，导致A/B/C这三个分组被加入到颜色映射的水平库中，而scale_color_manual又包含了这些分组的颜色定义，所以图例会自动显示所有颜色水平。
• show.legend = FALSE仅控制当前geom的符号（比如竖线图标）是否在图例中展示，不会从颜色标度里移除对应的分组水平，因此A/B/C依然会留在图例里。

解决方法 #

方法1：将竖线颜色移出aes()（推荐，逻辑更清晰） #

如果竖线的颜色不需要参与图例映射，直接把color作为geom_vline的参数而非aes()内的映射，这样不会触发颜色分组的图例生成：

ggplot(line_data, aes(x = dose, y = len, color = supp)) +
  geom_line(size = 1) +
  # 把color放在aes外面，直接赋值对应颜色列
  geom_vline(
    data = vline_data,
    aes(xintercept = x_pos),
    color = vline_data$v_color,
    size = 1,
    show.legend = FALSE
  ) +
  scale_color_manual(values = c(VC = "orange", OJ = "purple"))

方法2：手动过滤图例显示的水平 #

如果必须在aes()中定义竖线颜色（比如需要动态映射），可以通过scale_color_manual的breaks参数指定只显示折线图的分组：

ggplot(line_data, aes(x = dose, y = len, color = supp)) +
  geom_line(size = 1) +
  geom_vline(data = vline_data, aes(xintercept = x_pos, color = v_group), size = 1) +
  scale_color_manual(
    values = c(VC = "orange", OJ = "purple", A = "red", B = "blue", C = "green"),
    breaks = c("VC", "OJ") # 仅保留折线图的分组
  )

方法3：通过图例覆盖隐藏竖线分组的符号 #

也可以用guide_legend的override.aes参数，把A/B/C对应的图例符号设为不可见：

ggplot(line_data, aes(x = dose, y = len, color = supp)) +
  geom_line(size = 1) +
  geom_vline(data = vline_data, aes(xintercept = x_pos, color = v_group), size = 1) +
  scale_color_manual(
    values = c(VC = "orange", OJ = "purple", A = "red", B = "blue", C = "green"),
    guide = guide_legend(
      override.aes = list(linetype = c(1, 1, 0, 0, 0)) # 前两个是折线的linetype，后三个设为0隐藏
    )
  )

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