如何隐藏ggplot分面箱线图中的指定图例部分？

问题复现 #

假设你的代码类似这样（基于msleep数据集），会导致分面变量（如vore）的额外图例出现：

library(ggplot2)
data(msleep)

# 计算分面组均值
facet_means <- aggregate(sleep_total ~ vore, msleep, mean, na.rm = TRUE)

# 有问题的绘图代码：分面变量被意外映射到美学属性，或全局aes导致多余图例
ggplot(msleep, aes(x = order, y = sleep_total, colour = vore)) +
  geom_boxplot(outlier.colour = "red") +
  stat_summary(fun = mean, geom = "point", shape = 18, size = 3, aes(colour = "分面内组均值")) +
  geom_hline(data = facet_means, aes(yintercept = sleep_total, colour = "分面整体均值")) +
  facet_wrap(~vore) +
  scale_colour_manual(values = c("分面内组均值" = "blue", "分面整体均值" = "green",
                                 "carni" = "orange", "herbi" = "purple", "insecti" = "brown", "omni" = "pink"))

解决方案 #

核心思路是避免分面变量被映射到生成图例的美学属性，同时精准控制需要保留的图例项：

library(ggplot2)
data(msleep)

# 计算分面组均值
facet_means <- msleep |> 
  subset(!is.na(vore)) |> 
  aggregate(sleep_total ~ vore, FUN = function(x) mean(x, na.rm = TRUE))

ggplot(msleep, aes(x = order, y = sleep_total)) +
  # 箱线图：设置order的颜色，但隐藏该部分图例
  geom_boxplot(aes(colour = order), outlier.colour = "red", show.legend = FALSE) +
  # 分面内组均值标记：映射专属颜色标签
  stat_summary(
    fun = mean, geom = "point", shape = 18, size = 3,
    aes(colour = "分面内组均值")
  ) +
  # 分面整体均值水平线：映射专属颜色标签
  geom_hline(
    data = facet_means,
    aes(yintercept = sleep_total, colour = "分面整体均值"),
    linewidth = 1
  ) +
  facet_wrap(~vore) +
  # 手动设置颜色，仅保留需要的图例项
  scale_colour_manual(
    name = "均值标记",
    values = c(
      "分面内组均值" = "darkblue",
      "分面整体均值" = "darkgreen",
      # 保留order的颜色配置（不影响图例）
      setNames(scales::hue_pal()(length(unique(msleep$order))), unique(msleep$order))
    ),
    breaks = c("分面内组均值", "分面整体均值")
  ) +
  theme(axis.text.x = element_text(angle = 90, vjust = 0.5, hjust = 1))

关键步骤说明 #

1. 移除分面变量的美学映射：确保分面变量（如vore）没有被放到全局aes()或任何geom的aes()中作为colour/fill等属性，从根源避免生成分面变量的图例。
2. 隐藏不需要的geom图例：箱线图的order颜色仅用于区分组别，不需要图例，直接在geom_boxplot中设置show.legend = FALSE。
3. 精准控制图例显示项：通过scale_colour_manual的breaks参数，只指定需要保留的两个均值标记标签，其他颜色配置不会出现在图例中。

如果你的代码中是其他原因导致分面变量图例出现，比如误将分面变量用于fill美学，只需将上述方法中的colour替换为对应美学属性（如fill）即可。

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