r - 如何动态调整y轴范围是ggplot2？

Question

如何调整 y 轴，以便在这种绘图中也能正确显示注释？

library(ggplot2)

ggplot(diamonds, aes(x = cut, y = depth)) +
  facet_wrap(~ color) +
  stat_summary(fun.y = sum, geom="bar", fill = "yellow", aes(label=cut, vjust = 0)) +
  stat_summary(fun.y = sum, geom="text", aes(label=cut), vjust = 0)

例如，现在“Ideal”的 facet G 注释未正确显示。 Y 轴范围应动态计算，以便在柱上方始终有一些空间用于注释。所以我不能使用固定的 y 轴范围。

Answer 1

如何在现有代码之后使用 + scale_y_continuous(expand=c(0.15,0)):

expand= 需要乘法和加法比例因子的 2 数向量