geom_text how to position the text on bar as I want?

by

Edit:

The easier solution to get hjust/vjust to behave intelligently is to add the group aesthetic to geom_text and then hjust & position adjust for the group automatically.

1. Vertical Orientation

ggplot(data) + 
  geom_bar(
    aes(x = name, y = count, fill = week, group = week), 
    stat="identity", position = 'dodge'
  ) +
  geom_text(
    aes(x = name, y = count, label = count, group = week),
    position = position_dodge(width = 1),
    vjust = -0.5, size = 2
  ) + 
  theme_bw()

This gives:

enter image description here

2. Horizontal Orientation

ggplot(data) + 
  geom_bar(
    aes(x = name, y = count, fill = week, group = week), 
    stat="identity", position = 'dodge'
  ) +
  geom_text(
    aes(x = name, y = count, label = count, group = week), 
    hjust = -0.5, size = 2,
    position = position_dodge(width = 1),
    inherit.aes = TRUE
  ) + 
  coord_flip() + 
  theme_bw()

This gives:

enter image description here

This is not necessarily the most general way to do this, but you can have a fill dependent hjust (or vjust, depending on the orientation) variable. It is not entirely clear to me how to select the value of the adjustment parameter, and currently it is based on what looks right. Perhaps someone else can suggest a more general way of picking this parameter value.

1. Vertical Orientation

library(dplyr)
library(ggplot2)

# generate some data
data = data_frame(
  week = as.factor(rep(c(1, 2), times = 5)),
  name = as.factor(rep(LETTERS[1:5], times = 2)),
  count = rpois(n = 10, lambda = 20),
  hjust = if_else(week == 1, 5, -5),
  vjust = if_else(week == 1, 3.5, -3.5)
)

# Horizontal
ggplot(data) + 
  geom_bar(
    aes(x = name, y = count, fill = week, group = week), 
    stat="identity", position = 'dodge'
  ) +
  geom_text(
    aes(x = name, y = count, label = count, vjust = vjust), 
    hjust = -0.5, size = 2,
    inherit.aes = TRUE
  ) + 
  coord_flip() + 
  theme_bw()

Here is what that looks like:

enter image description here

2. Horizontal Orientation

ggplot(data) + 
  geom_bar(
    aes(x = name, y = count, fill = week, group = week), 
    stat="identity", position = 'dodge'
  ) +
  geom_text(
    aes(x = name, y = count, label = count, vjust = vjust), 
    hjust = -0.5, size = 2,
    inherit.aes = TRUE
  ) + 
  coord_flip() + 
  theme_bw()

Here is what that looks like:

enter image description here

More Related Contents:

  1. How to add frequency count labels to the bars in a bar graph using ggplot2? [duplicate]
  2. Stacked bar chart
  3. Change bar plot colour in geom_bar with ggplot2 in r
  4. ggplot bar plot with facet-dependent order of categories
  5. ggplot2 geom_bar – how to keep order of data.frame [duplicate]
  6. customize ggplot2 axis labels with different colors
  7. ggplot2 and a Stacked Bar Chart with Negative Values
  8. ggplot replace count with percentage in geom_bar
  9. Generate paired stacked bar charts in ggplot (using position_dodge only on some variables)
  10. Add percentage labels to a stacked barplot
  11. ggplot2: Setting geom_bar baseline to 1 instead of zero
  12. Change geom_text’s default “a” legend to label string itself
  13. How to make variable bar widths in ggplot2 not overlap or gap
  14. Bars in geom_bar have unwanted different widths when using facet_wrap
  15. R: ggplot stacked bar chart with counts on y axis but percentage as label
  16. Connect stack bar charts with multiple groups with lines or segments using ggplot 2
  17. ggplot: Order bars in faceted bar chart per facet
  18. annotate boxplot in ggplot2
  19. Creating a vertical color gradient for a geom_bar plot
  20. Force the origin to start at 0
  21. Adding space between bars in ggplot2
  22. Align plot areas in ggplot
  23. percentage on y lab in a faceted ggplot barchart?
  24. Force ggplot legend to show all categories when no values are present [duplicate]
  25. Greek letters, symbols, and line breaks inside a ggplot legend label
  26. Asymmetric expansion of ggplot axis limits
  27. How to add shaded confidence intervals to line plot with specified values
  28. Removing Unused Factors from a Facet in ggplot2
  29. Adding percentage labels on pie chart in R
  30. show multiple plots from ggplot on one page in r

Leave a Comment