在ggplot中添加趋势线作为独立图例的实现方法

搞定这个需求超简单！核心思路是给趋势线的某个美学属性（比如线型linetype）做一个自定义映射，让ggplot把它当成独立的图例项来渲染，完全和type/level的图例区分开。

下面是修改后的完整可复现代码，直接运行就能得到你想要的效果：

library(tidyverse)
perc <- c(.5, .49, .67, .5, .67, .73, .82)
year <- c(2000, 2001, 2002, 2003, 2004, 2005, 2006)
type <- as.factor(c(1, 1, 1, 1, 1, 2, 2))
level <- as.factor(c(3, 3, 3, 4, 4, 4, 4))
data <- data.frame(year, perc, type, level)

ggplot(data, aes(x=year, y=perc, color = type, shape = level)) + 
  geom_point(size = 3) + 
  # 关键：给趋势线添加linetype映射，用于生成独立图例
  geom_smooth(
    aes(group = 1, linetype = "trendline"), 
    method = "lm", 
    se = FALSE, 
    color = "darkblue"  # 手动指定趋势线颜色，避免和type的颜色冲突
  ) + 
  scale_color_manual(values = c("red", "black")) + 
  scale_shape_manual(values = c(16, 17)) +
  # 自定义线型图例的样式：这里用实线（值为1）
  scale_linetype_manual(name = "", values = 1) +
  # 调整图例顺序和标题，让趋势线图例独立显示
  guides(
    color = guide_legend(order = 1, title = "type"),
    shape = guide_legend(order = 2, title = "level"),
    linetype = guide_legend(
      order = 3, 
      title = "trendline",
      override.aes = list(color = "darkblue")  # 确保图例图标显示正确颜色
    )
  )

关键步骤解释： #

• 给趋势线添加图例映射：在geom_smooth的aes里加上linetype = "trendline"，这会让ggplot识别出这是一个需要单独图例的分类项。
• 区分趋势线颜色：手动指定color = "darkblue"是为了避免趋势线颜色和type的红色/黑色重复，让图表逻辑更清晰（如果不需要特殊颜色可以去掉，ggplot会用默认配色）。
• 自定义线型图例：scale_linetype_manual设置趋势线的线型（这里用实线，值为1），先把名称设为空，后面在guides里统一设置标题更灵活。
• 调整图例布局：guides函数用来控制三个图例的显示顺序和标题，确保趋势线的图例独立出现在最后，并且标题为“trendline”。override.aes参数是为了让图例里的趋势线图标颜色和实际趋势线保持一致。

如果不需要精细调整图例顺序，也可以用简化版代码，核心逻辑不变：

ggplot(data, aes(x=year, y=perc, color = type, shape = level)) + 
  geom_point(size = 3) + 
  geom_smooth(aes(group = 1, linetype = "trendline"), method = "lm", se = FALSE) + 
  scale_color_manual(values = c("red", "black")) + 
  scale_shape_manual(values = c(16, 17)) +
  scale_linetype_manual(name = "trendline", values = 1)

这样也能生成独立的趋势线图例，只是图例顺序会由ggplot自动排列。

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