R语言多DataFrame同图绘图：图例与点尺寸设置问题

核心思路：统一数据映射 #

ggplot2的设计逻辑基于单数据源的美学映射，分开处理多个DataFrame容易出现图例、映射失效的问题，最优方案是先合并数据并添加分组标识，再统一配置映射。

1. 合并数据并添加分组列 #

先给每个DataFrame添加年份区间的分组列，再合并成一个数据集：

library(dplyr)
library(ggplot2)

# 为每个数据集添加分组标识
T_N_6190 <- T_N_6190 %>% mutate(year_group = "1961-1990")
T_N_9120 <- T_N_9120 %>% mutate(year_group = "1991-2020")
T_N_2123 <- T_N_2123 %>% mutate(year_group = "2021-2023")

# 合并为单个数据集
combined_df <- bind_rows(T_N_6190, T_N_9120, T_N_2123)

2. 解决三个问题的统一绘图代码 #

替换代码中的x/y轴、热力值列名即可直接使用：

ggplot(combined_df, aes(x = 你的X轴列名, y = 你的Y轴列名)) +
  # 绘制热力层（以geom_tile为例，根据实际热力图类型调整）
  geom_tile(aes(fill = 你的热力值列名)) +
  # 绘制点层：同时映射分组颜色和T_m尺寸
  geom_point(aes(color = year_group, size = T_m), alpha = 0.8) +
  # 自定义分组颜色，解决color放aes后自定义失效的问题
  scale_color_manual(values = c(
    "1961-1990" = "#FF5733",  # 自定义颜色1
    "1991-2020" = "#33FF57",  # 自定义颜色2
    "2021-2023" = "#3357FF"   # 自定义颜色3
  )) +
  # 控制点尺寸范围，适配T_m列的数值
  scale_size_continuous(range = c(2, 8)) +
  # 修改图例标题，优化可读性
  labs(
    fill = "热力值",
    color = "年份区间",
    size = "T_m数值"
  ) +
  theme_minimal()

各问题的针对性解释 #

• 无图例问题：通过在geom_point的aes中映射color = year_group，ggplot会自动基于分组生成图例，配合labs可自定义图例标题。
• 点尺寸无法关联数据列：直接在aes中写size = T_m，用scale_size_continuous设定尺寸范围，点的大小会随T_m列的数值动态变化，无需手动输入固定值。
• 自定义颜色失效：当color放在aes内时，必须用scale_color_manual指定每个分组对应的颜色，既保留映射关系（生成图例），又能实现自定义颜色需求，不会出现颜色失效的情况。

备选方案：不合并数据的写法 #

如果不想合并数据，可单独调用geom_point并手动指定分组映射：

ggplot() +
  geom_tile(data = 你的热力数据集, aes(x = X轴列, y = Y轴列, fill = 热力值列)) +
  geom_point(data = T_N_6190, aes(x = X轴列, y = Y轴列, color = "1961-1990", size = T_m)) +
  geom_point(data = T_N_9120, aes(x = X轴列, y = Y轴列, color = "1991-2020", size = T_m)) +
  geom_point(data = T_N_2123, aes(x = X轴列, y = Y轴列, color = "2021-2023", size = T_m)) +
  scale_color_manual(values = c(
    "1961-1990" = "#FF5733",
    "1991-2020" = "#33FF57",
    "2021-2023" = "#3357FF"
  )) +
  scale_size_continuous(range = c(2, 8)) +
  labs(color = "年份区间", size = "T_m数值")

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