grouped bars example

grouped bars.R

library(tidyverse)

# make some data
df = expand.grid(
  x = 1:5,
  category = LETTERS[1:3]
)
df$value = runif(nrow(df), 0, 50)

# chart
ggplot(df) +
  aes(x=x, y=value, fill=category) +
  geom_col(
    width=0.7, # shrink the bars
    position=position_dodge(width=0.7) # position the bars
  )