Как получить метки данных для гистограммы в ggplot2?

Ниже код работает хорошо, и он наклеивает штрих-код правильно, Однако, если я пытаюсь geom_text для гистограммы я Fail, так как geom_text требует y-компонент и гистограмму y компонент - это частота, которая никогда не является частью кода, тогда КАК Я беру метки для гистограммы?

Хорошо работает

 ggplot(csub, aes(x=Year, y=Anomaly10y, fill=pos)) +
        geom_bar(stat="identity", position="identity") +
        geom_text(aes(label=Anomaly10y,vjust=1.5))

Проблема - нет компонента Y (обозначается?) в приведенном ниже коде для geom_text

ggplot(csub,aes(x=Anomaly10y)) + 
        geom_histogram() 
        geom_text(aes(label=?,vjust=1.5))

По умолчанию geom требует компонент x и y,

Что делать, если у меня нет y-компонента, поскольку он автоматически генерируется функцией?

ОТВЕТЫ

Ответ 1

geom_histogram() - это просто причудливая обертка для stat_bin, чтобы вы могли все с барами и текстом, который вам нравится. Вот пример

#sample data
set.seed(15)
csub<-data.frame(Anomaly10y = rpois(50,5))

И затем мы построим его с помощью

ggplot(csub,aes(x=Anomaly10y)) + 
    stat_bin(binwidth=1) + ylim(c(0, 12)) +  
    stat_bin(binwidth=1, geom="text", aes(label=..count..), vjust=-1.5)

чтобы получить

labeled univariate ggplot2 barplot