r - 如何在ggplot中的箱线图上打印平均值、中位数和标准差？

Question

我有以下箱线图，我正在尝试打印每个箱上的平均值、中位数和标准差值，这是如何工作的？ geom_boxplot 中有没有简单的方法或简单的参数来实现这一点？ 谢谢

ggplot(mpg,aes(x=class,y=cty))+geom_boxplot()

Answer 1

您首先需要计算摘要统计数据:

library(dplyr)

summ <- mpg %>% 
  group_by(class) %>% 
  summarize(mean = mean(cty), median = median(cty), sd = sd(cty))

然后在您的 geom_label 调用中使用该数据框。

ggplot(mpg, aes(x = class, y = cty)) + geom_boxplot() + 
  geom_label(data = summ, aes(x = class, y = mean, 
    label = paste("Mean: ", round(mean, 1), "\nMedian: ", median, "\nSD: ", round(sd, 1))))

不是一个好看的图表，但您只需要调整大小和颜色来美化它，或者可以使用 geom_text 而不是 geom_label。