“Lote de barras empilhadas com faixas etárias” Respostas de código

Lote de barras empilhadas com faixas etárias

data$group <- cut(data$Age, breaks = c(30,33,36,39), labels = c("30-33","33-36","36-39"), right = TRUE)
ggplot(data, aes(x = group, fill = Gender)) + 
  geom_bar()