如何在ggplot的facet_wrap子图中单独设置geom_bracket？

要给每个facet子图单独设置geom_bracket，核心是让标注信息和子图的分组（这里是Species）一一对应，具体可以通过创建包含分组信息的标注数据集来实现：

1. 准备标注数据集
   创建一个数据框，包含每个标注对应的物种、对比的x轴类别、标注位置和显著性符号：

   bracket_data <- tibble(
     Species = c("setosa", "virginica", "virginica"), # 对应子图的物种
     xmin = c("Petal.Length", "Petal.Length", "Sepal.Width"), # 对比的左类别
     xmax = c("Sepal.Length", "Sepal.Length", "Petal.Width"), # 对比的右类别
     y.position = c(7, 8, 7.5), # 括号的垂直位置
     label = c("*", "**", "ns") # 显著性标签
   )
   

2. 修改绘图代码
   在调用geom_bracket时，指定使用上面的标注数据集，这样ggplot会自动根据facet_wrap的分组匹配，只在对应子图显示标注：

   library(tidyverse)
   library(ggpubr)
   
   data <- iris %>% 
     pivot_longer(-Species)
   
   ggplot(data, aes(x = name, y = value)) +
     geom_boxplot() +
     facet_wrap(~ Species) +
     geom_bracket(
       data = bracket_data, # 指定标注数据集
       aes(xmin = xmin, xmax = xmax, y.position = y.position, label = label),
       inherit.aes = FALSE # 禁用继承主图的aes，避免冲突
     )
   

关键说明 #

• 原代码的问题在于geom_bracket没有绑定分组信息，所以会在所有子图重复绘制相同的括号。
• 通过给标注数据集添加Species列，配合inherit.aes = FALSE，可以确保每个标注仅出现在对应的子图中。
• 如果某个子图不需要标注，只需不在标注数据集中添加对应物种的条目即可（比如示例中的versicolor）。

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