Как настроить диапазоны оси 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) 

Теперь, например, в фасете G аннотации для 'идеального' правильно не показан. Диапазон Y-оси должен быть рассчитан динамически, так что всегда есть место для аннотации над столбцами. Поэтому я не могу использовать фиксированные диапазоны оси y.

Answer 1

Как об использовании + scale_y_continuous(expand=c(0.15,0)) после существующего кода:

expand= ожидает 2-номер вектора мультипликативный и аддитивный масштабные коэффициенты