如何在ggplot中添加包含分组效应与整体效应的图例？

针对mtcars数据集，要让分组拟合线和整体拟合线都出现在图例中，核心是把整体拟合线的颜色也纳入aes映射，再通过手动颜色配置统一管理图例项。以下是完整实现代码和说明：

完整代码示例 #

library(ggplot2)

# 加载mtcars数据集，将am转为因子（0=自动档，1=手动档）
mtcars$am <- factor(mtcars$am, labels = c("自动档", "手动档"))

ggplot(mtcars, aes(x = wt, y = mpg)) +
  # 分组散点
  geom_point(aes(color = am), size = 2) +
  # 分组线性拟合线
  geom_smooth(aes(color = am), method = "lm", se = FALSE, linewidth = 1) +
  # 整体线性拟合线：关键是将color映射到自定义类别"整体效应"
  geom_smooth(aes(color = "整体效应"), method = "lm", se = FALSE, linewidth = 1, linetype = "dashed") +
  # 手动设置颜色与图例标签
  scale_color_manual(
    name = "效应类型",
    values = c("自动档" = "#1f77b4", "手动档" = "#ff7f0e", "整体效应" = "#2ca02c"),
    breaks = c("自动档", "手动档", "整体效应")
  ) +
  # 调整主题与标签
  labs(x = "车重（1000lbs）", y = "每加仑英里数", title = "车重与油耗的回归效应对比") +
  theme_minimal()

关键步骤说明 #

• 整体拟合线的aes映射：之前的代码可能直接用color="black"（不在aes内），这样ggplot不会将其纳入图例。现在将color="整体效应"放在aes()里，让它成为一个图例项。
• 统一颜色配置：用scale_color_manual指定每个类别（自动档、手动档、整体效应）的颜色，同时设置图例名称和显示顺序，确保所有项都出现在图例中。
• 区分样式（可选）：给整体拟合线设置linetype="dashed"，可以更直观地区分分组与整体效应。

其他可选思路 #

如果不想修改aes映射，也可以通过guides()和override.aes手动添加图例项，但这种方法更繁琐。推荐上面的aes映射+手动颜色配置的方案，逻辑更清晰，维护性更强。

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