How to add a number of observations per group and use group mean in ggplot2 boxplot?

by

Is this anything like what you’re after? With stat_summary, as requested:

# function for number of observations 
give.n <- function(x){
  return(c(y = median(x)*1.05, label = length(x))) 
  # experiment with the multiplier to find the perfect position
}

# function for mean labels
mean.n <- function(x){
  return(c(y = median(x)*0.97, label = round(mean(x),2))) 
  # experiment with the multiplier to find the perfect position
}

# plot
ggplot(mtcars, aes(factor(cyl), mpg, label=rownames(mtcars))) +
  geom_boxplot(fill = "grey80", colour = "#3366FF") +
  stat_summary(fun.data = give.n, geom = "text", fun.y = median) +
  stat_summary(fun.data = mean.n, geom = "text", fun.y = mean, colour = "red")

Black number is number of observations, red number is mean value. joran’s answer shows you how to put the numbers at the top of the boxes
enter image description here

hat-tip: https://stackoverflow.com/a/3483657/1036500

More Related Contents:

  1. Plot multiple boxplot in one graph
  2. Put stars on ggplot barplots and boxplots – to indicate the level of significance (p-value)
  3. Labeling Outliers of Boxplots in R
  4. Changing whisker definition in geom_boxplot
  5. Merge and Perfectly Align Histogram and Boxplot using ggplot2
  6. How to change order of boxplots when using ggplot2?
  7. How to plot a hybrid boxplot: half boxplot with jitter points on the other half?
  8. geom_boxplot with precomputed values
  9. Include space for missing factor level used in fill aesthetics in geom_boxplot
  10. In ggplot2, what do the end of the boxplot lines represent?
  11. Removing one tableGrob when applied to a box plot with a facet_wrap
  12. How to draw the boxplot with significant level?
  13. Joining means on a boxplot with a line (ggplot2)
  14. Generate ggplot2 boxplot with different colours for multiple groups
  15. Change or modify x axis tick labels in R using ggplot2 [duplicate]
  16. Add color to boxplot – “Continuous value supplied to discrete scale” error
  17. annotate boxplot in ggplot2
  18. Add number of observations per group in boxplot
  19. Stacked Bar Plot in R
  20. How can I remove empty factors from ggplot2 facets?
  21. Error in grid.Call(L_textBounds, as.graphicsAnnot(x$label), x$x, x$y, : Polygon edge not found
  22. Plot data in descending order as appears in data frame [duplicate]
  23. How to position strip labels in facet_wrap like in facet_grid
  24. Plot a function with ggplot, equivalent of curve()
  25. How to deal with “data of class uneval” error from ggplot2?
  26. Issue with ggplot2, geom_bar, and position=”dodge”: stacked has correct y values, dodged does not
  27. stat_contour not able to generate contour lines
  28. Add x and y axis to all facet_wrap
  29. R Plot Filled Longitude-Latitude Grid Cells on Map
  30. Specify height and width of ggplot graph in Rmarkdown knitr output

Leave a Comment