O meu código é o seguinte:
library(dplyr)
library(ggplot2)
dados %>%
filter( Sexo != "Ignorado" & trimestre == "Mar-Abr-Mai, 20") %>%
ggplot() +
aes(x = Sexo, fill = `Faixa etária`) +
geom_bar() +
ylim(0, maximo.sex)+
geom_text(aes(label = ..count.. [as.character(..x..)]*100),
stat = "count", position = position_fill(0.5), family="serif", size=3, color="black") +
scale_fill_manual(values = met.brewer("NewKingdom", 4)) +
labs(y = "", subtitle = "Mar-Abr-Mai, 20",
fill = "Faixa etária"
) +
tema
Quando rodo o resultado é o da imagem abaixo:
Eu queria colocar os valores dentro das barras, mas não estou conseguindo com o geom_text
dput(dados)
,dput(head(dados, n = 20))
ou em dados similares.