r - 在 ggplot2 中注释箱线图

Question

我已经使用 ggplot2 创建了一个并排的箱线图。

p <- ggplot(mtcars, aes(x=factor(cyl), y=mpg))
p + geom_boxplot(aes(fill=factor(cyl)))

我想在图中用最小值、最大值、第 1 个四分位数、中位数和第 3 个四分位数进行注释。我知道 geom_text()可以这样做，可能是 fivenum()很有用。但我无法弄清楚我到底能做什么!.这些值应该显示在我的图中。

Answer 1

我能想到的最简洁的方法是使用 stat_summary .我还将标签映射到颜色美学，但当然，如果您愿意，您可以将标签设置为单一颜色:

ggplot(mtcars, aes(x=factor(cyl), y=mpg, fill=factor(cyl))) + 
  geom_boxplot(width=0.6) +
  stat_summary(geom="text", fun.y=quantile,
               aes(label=sprintf("%1.1f", ..y..), color=factor(cyl)),
               position=position_nudge(x=0.33), size=3.5) +
  theme_bw()

在上面的代码中，我们使用 quantile作为获取标签值的汇总函数。 ..y..指回 quantile 的输出函数(通常， ..*.. 是一个 ggplot 结构，用于使用在 ggplot 中计算的值)。