调整分面ggplot中来自ggpubr的重要级别的位置，使其位于boxplot之上

install.packages("ggplot2")
install.packages("ggpubr")

library(ggplot2)
library(ggpubr)

data <- data.frame(
  group = rep(c("A", "B", "C"), each = 10),
  value = c(rnorm(10, mean = 0), rnorm(10, mean = 1), rnorm(10, mean = 2))
)

p <- ggplot(data, aes(x = group, y = value)) +
  geom_boxplot()

p <- p + ggboxplot(data, x = "group", y = "value", add = "mean", color = "red")

p <- p + theme(axis.title.x = element_blank(),
               axis.title.y = element_blank(),
               plot.title = element_text(hjust = 0.5))

print(p)