R语言箱线图中标明显著性差异：使用 `geom_signif` 函数

在 R 语言箱线图中标明显著性差异：使用 geom_signif 函数

在箱线图中标明显著性水平可以帮助你直观地展示两组数据之间是否存在显著差异。ggplot2 包中的 geom_signif 函数可以轻松实现这一功能。

示例代码

以下代码示例演示了如何在箱线图中标明两组数据的显著性差异：

# 首先我们要将group字段的数据类型改为因子型，并命名相应的水平
comparison_hp$group <- factor(comparison_hp$group, 
                              levels = c(1, 2), 
                              labels = c('Patient', 'Healthy'))

# 制作箱线图（调整箱状图宽度）
ggplot(comparison_hp, aes(x = factor(group), y = ISQ_adjusted)) + 
  geom_boxplot(width = 0.5) +  # 调整宽度为 0.5
  scale_fill_manual(values = c('black', 'grey'), 
                    name = 'Group', 
                    labels = c('Patient', 'Healthy')) + 
  labs(title = 'Boxplot of Adjusted ISQ Scores',
       x = expression(bold('Group')),
       y = expression(bold('Adjusted ISQ Score'))) + 
  theme_bw() + 
  theme(panel.grid.major = element_blank(), 
        panel.grid.minor = element_blank(),
        axis.text.x = element_text(color = 'black', size = 12, face = 'bold'),
        axis.text.y = element_text(color = 'black', size = 12, face = 'bold'),
        axis.title.x = element_text(color = 'black', size = 12, face = 'bold'),
        axis.title.y = element_text(color = 'black', size = 12, face = 'bold')) + 
  guides(fill = FALSE) + 
  coord_cartesian(ylim = c(-60, 60)) + 
  geom_signif(comparisons = list(c('Patient', 'Healthy')), 
              map_signif_level = TRUE,
              textsize = 4)

在上面的代码中，我们使用 geom_signif 函数来标明两组的显著性差异。在 comparisons 参数中，我们指定了需要比较的两组，即 c('Patient', 'Healthy')。map_signif_level 参数用于指示是否将显著性水平值添加到图中。textsize 参数用于设置显著性标记的文本大小。

解释

• comparisons 参数：指定要比较的组别。例如，comparisons = list(c('Patient', 'Healthy')) 表示要比较 “Patient” 组和 “Healthy” 组。
• map_signif_level 参数：指示是否将显著性水平值添加到图中。TRUE 表示添加，FALSE 表示不添加。
• textsize 参数：设置显著性标记的文本大小。

总结

通过使用 geom_signif 函数，你可以在箱线图中轻松地标明显著性水平，从而使你的图表更加直观易懂。请注意，显著性标记的具体样式和位置可能需要根据你的数据和需求进行微调。