Simple barplot with labels on top (ggplot2)

barplot-with-labels-on-top.R

library(tidyverse)
library(palmerpenguins)

ggplot(
  penguins,
  aes(y = species, group = sex, fill = sex)
) +
  geom_bar(width = .4) +
  geom_text(aes(label = paste("Penguin species:", species), x = 0), nudge_y = .3, hjust = 0, size = 6) +
  theme_void() +
  theme(
    plot.background = element_rect(color = "white", fill = "white"),
    legend.position = c(.8, .5)
  )