geom_bar with annotation inside bars aligned with x-axis

ggplot2, r

Solution

You can do this by swapping the `geom` and the `stat`. In other words, use `geom_text(stat="bin", ...)`.

This allows you to explicitly set the `y` position (i.e. outside the `aes`) and also specify the text alignment with `hjust=0`.

Try this:

ggplot(df, aes(x =  results)) +
  geom_bar(binwidth = 0.5, colour = "black", fill = "white", drop = T) +
  scale_y_log10() +
  geom_hline(aes(yintercept = 1)) +
  geom_text(stat="bin", binwidth = 0.5, y=0.1, hjust=0,
           aes(x = results, angle = 90, 
               label = gsub(" ", "", format(..count.., big.mark = ",", 
                                            scientific=F))))

Problem

I'm trying to create a histogram of results using geom_bar and want to include the count of results as text within each bar aligned with the x-axis. This is what i have so far: ``` df <- data.frame(results = rnorm(100000)) require(ggplot2) p = ggplot(df, aes(x = results)) p = p + geom_bar(binwidth = 0.5, colour = "black", fill = "white", drop = T) p = p + scale_y_log10() p = p + geom_hline(aes(yintercept = 1)) p = p + stat_bin(geom = "text", binwidth = 0.5, aes(x = results, angle = 90, y = 2, label = gsub(" ", "",format(..count.., big.mark = ",", scientific=F)))) p ``` As you can see the text is not aligned with the x-axis and as my true data is far larger (in the order of millions) this problem is made slightly worse: Current figure: Desired figure: Note: by setting y = 3 in stat_bin i get a warning stating "Mapping a variable to y and also using stat="bin". etc..." but am not sure how to force the position of the text to be at the bottom of the graph without defining a y value.

Original source