如何在ggplot2图例中仅展示丰度最高的前3个分组

有两种常用实现方案，可根据你的使用场景选择：

方案1：预处理合并低丰度分组（推荐） #

该方案逻辑清晰，后续可视化调整灵活度更高，适合绝大多数场景。

• 先统计各分组的样本量，筛选出丰度前3的分组，将剩余分组统一合并为「其他」类
• 示例代码：

library(ggplot2)
library(dplyr)

# 构造示例数据，可替换为你的实际数据集
df <- data.frame(
  group = rep(c("A","B","C","D","E","F","G"), c(2,3,1,25,23,20,3)),
  x = rnorm(sum(c(2,3,1,25,23,20,3))),
  y = rnorm(sum(c(2,3,1,25,23,20,3)))
)

# 提取丰度前3的分组名
top3_groups <- df %>% 
  count(group, sort = TRUE) %>% 
  slice(1:3) %>% 
  pull(group)

# 新增展示用分组列，非前3分组统一归为其他
df <- df %>% 
  mutate(group_display = ifelse(group %in% top3_groups, group, "其他"))

# 绘图时仅展示前3分组图例，不需要显示「其他」可在scale中指定breaks
ggplot(df, aes(x = x, y = y, color = group_display)) +
  geom_point() +
  # 仅保留前3分组在图例中
  scale_color_discrete(breaks = top3_groups)

方案2：直接在ggplot层控制图例（无需修改原始数据） #

如果你不需要合并低丰度分组，仅想隐藏低丰度分组的图例条目，可直接在映射对应的scale函数中指定breaks参数：

ggplot(df, aes(x = x, y = y, color = group)) +
  geom_point() +
  # breaks参数仅传入需要展示的分组名，其余分组会正常渲染但不显示在图例中
  scale_color_discrete(breaks = c("D","E","F"))

注意事项 #

• 如果你的映射属性是填充fill，将上述代码中的scale_color_discrete替换为对应scale_fill_*系列函数即可，参数设置逻辑完全一致
• 如果你自定义了分组颜色/样式，仅需保证所有分组的自定义映射关系完整，breaks参数依然只传前3个分组名，不会影响其他分组的正常渲染

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