如何在ggplot中为未映射美学的元素手动添加图例？

你可以通过将颜色映射到虚拟分类变量，再手动指定颜色与标签的对应关系来实现，无需合并数据框，具体有两种常用方式：

方法一：在geom_point中映射color到自定义标签 #

直接在每个额外的geom_point的aes()里定义color为你想要的图例标签，然后用scale_color_manual()指定标签对应的颜色：

library(tidyverse)

df1 <- tibble(wt=4, mpg=25)
df2 <- tibble(wt=2, mpg=15)

ggplot(mtcars, aes(x=wt, y=mpg)) + 
  geom_point() +
  # 把color映射到自定义标签，而非直接赋值
  geom_point(data=df1, aes(x=wt, y=mpg, color="My Car"), size=3) +
  geom_point(data=df2, aes(x=wt, y=mpg, color="Your Car"), size=3) +
  # 指定每个标签对应的颜色，可自定义图例标题
  scale_color_manual(
    name = "自定义点",
    values = c("My Car" = "red", "Your Car" = "blue")
  )

这样ggplot会自动识别color的映射关系生成图例，mtcars的原始散点因未映射color，会保持默认黑色且不进入图例。

方法二：手动构建图例（适合复杂自定义需求） #

如果需要更灵活控制图例的符号、大小等属性，可以先创建空的颜色映射，再通过guides()强制生成并调整图例样式：

library(tidyverse)

df1 <- tibble(wt=4, mpg=25)
df2 <- tibble(wt=2, mpg=15)

ggplot(mtcars, aes(x=wt, y=mpg)) + 
  geom_point() +
  geom_point(data=df1, color="red", size=3) +
  geom_point(data=df2, color="blue", size=3) +
  # 定义图例的标签和颜色对应关系
  scale_color_manual(
    name = "自定义点",
    values = c("My Car" = "red", "Your Car" = "blue"),
    breaks = c("My Car", "Your Car")
  ) +
  # 手动匹配图例符号的样式与自定义点一致
  guides(color = guide_legend(
    override.aes = list(
      size = 3,
      shape = 19
    )
  ))

这种方法的核心是先通过scale_color_manual预设图例规则，再用guides()强制生成图例并调整细节，即使原始geom_point未在aes()中映射color也能生效。

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