求助：如何在RStudio的ggplot中为不同geom_point添加图例？

我来帮你搞定这个ggplot图例的问题！你的代码没生成图例的核心原因是：你把颜色、形状这些属性直接设置成了固定值（比如colour = "green"），或者没有把变量正确映射到aes()里——ggplot只有当属性是从数据映射而来时，才会自动生成图例。下面给你两种解决方案：

方法一：整理为整洁数据（ggplot推荐方式） #

ggplot最适合处理「整洁数据」（每一行代表一个观测），所以我们可以先把你的宽格式数据转成长格式，这样就能统一做属性映射，自动生成图例。

步骤1：转换数据格式 #

先加载tidyr包（如果没装的话先运行install.packages("tidyr")），然后把Q1North和Q1South合并成一列：

library(tidyr)

# 转换为长格式
Report_Data_long <- Report_Data %>%
  pivot_longer(
    cols = c(Q1North, Q1South),  # 要合并的列
    names_to = "Direction",      # 新列：区分南北的标签
    values_to = "Density"        # 新列：对应的密度值
  )

步骤2：绘制带图例的图表 #

现在可以用转换后的数据绘图，把Direction（南北）映射到颜色和形状，再自定义想要的样式：

library(ggplot2)

ggplot(Report_Data_long, aes(x = `Transect Point`, y = Density)) +
  # 点层：把Direction映射到颜色和形状
  geom_point(aes(colour = Direction, shape = Direction), size = 5) +
  # 线层：按Direction分组，同时映射颜色
  geom_line(aes(colour = Direction, group = Direction), size = 1) +
  # 设置标题、坐标轴和说明
  labs(
    title = "Density of Trees Species found North & South of the creek using two sampling methods",
    y = "Density in Tree Species Found",
    x = "Transect Points",
    caption = "n7180853"
  ) +
  # 自定义颜色：对应North和South的颜色
  scale_colour_manual(values = c("Q1North" = "green", "Q1South" = "pink4")) +
  # 自定义形状：对应North和South的点形状
  scale_shape_manual(values = c("Q1North" = 6, "Q1South" = 4)) +
  # 图例位置
  theme(legend.position = "right")

方法二：不修改数据的手动映射 #

如果你不想转换数据格式，可以在每个geom的aes()里手动指定映射标签，再用scale_*_manual定义样式：

library(ggplot2)

ggplot(Report_Data, aes(x = `Transect Point`)) +
  # 北方的点和线：在aes里指定映射标签"North"
  geom_point(aes(y = Q1North, colour = "North", shape = "North"), size = 5) +
  geom_line(aes(y = Q1North, colour = "North"), size = 1) +
  # 南方的点和线：在aes里指定映射标签"South"
  geom_point(aes(y = Q1South, colour = "South", shape = "South"), size = 5) +
  geom_line(aes(y = Q1South, colour = "South"), size = 1) +
  # 设置标题、坐标轴和图例标题
  labs(
    title = "Density of Trees Species found North & South of the creek using two sampling methods",
    y = "Density in Tree Species Found",
    x = "Transect Points",
    caption = "n7180853",
    colour = "Direction",  # 颜色图例的标题
    shape = "Direction"    # 形状图例的标题（和颜色图例合并）
  ) +
  # 自定义颜色对应关系
  scale_colour_manual(values = c("North" = "green", "South" = "pink4")) +
  # 自定义形状对应关系
  scale_shape_manual(values = c("North" = 6, "South" = 4)) +
  theme(legend.position = "right")

额外注意点（你的原始代码问题） #

1. 不要在aes()里用Report_Data$列名：ggplot已经知道你的数据来源是Report_Data，直接写列名（比如x = Transect Point``，注意空格列名要加反引号）即可，否则可能导致分组或映射错误。
2. 直接设置属性不会生成图例：比如colour = "green"是固定值，不属于数据映射，所以ggplot不会为它生成图例；必须把属性放到aes()里，让它和数据的某个变量（或自定义标签）关联起来。
3. show.legend = TRUE是默认值，除非你想隐藏某个geom的图例，否则不需要特意写。

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