col_n should be made based on after_stat data

[davidhodge931]

penguins |> 
  gg_bar(
    x = island,
    mapping = ggplot2::aes(colour = sex, fill = sex),
  )