使用 'facet_wrap' 函数时 'stat_compare_means' 的问题

Question

我正在尝试创建如下所示的多面图。然而，统计数据总是只应用于其中一个地块。有没有一种解决方法可以使图形外观保持不变，但同时为两者添加统计信息？

这是我正在使用的代码

ggplot(dat, aes(x=`Treatment`,y=`Endostatin`, fill=Treatment))+

geom_boxplot(outlier.alpha = 0.25, outlier.color = "red") +

geom_point(alpha = 0.25, size = 2 ) +

facet_wrap(~Mode, scale="free") +

stat_compare_means(comparisons = my_comparisons) +

theme(axis.text.x = element_text(angle = 20))

Answer 1

你应该单独添加stat_compare_means

my_comparisons1 <- list(c("SHAM+vehicle", "TAC+vehicle"), c("TAC+vehicle", "TAC+relaxin"), c("TAC_vehicle", "TAC+Enalapril"))
my_comparisons2 <- list(c("TAC+vehicle", "TAC+relaxin")

stat_compare_means(comparisons = my_comparisons1 ) +
  stat_compare_means(comparisons = my_comparisons2 )

使用 'facet_wrap' 函数时 'stat_compare_means' 的问题

Problem with 'stat_compare_means' when using the 'facet_wrap' function

r

ggplot2

facet-wrap