Eu encontrei issoComo colocar rótulos sobre geom_bar em R com ggplot2, mas apenas coloca rótulos (números) em apenas uma barra.

Aqui está, digamos, duas barras para cada eixo x, como fazer a mesma coisa?

Meus dados e código são assim:

dat <- read.table(text = "sample Types Number
sample1 A   3641
sample2 A   3119
sample1 B   15815
sample2 B   12334
sample1 C   2706
sample2 C   3147", header=TRUE)

library(ggplot2)
bar <- ggplot(data=dat, aes(x=Types, y=Number, fill=sample)) + 
  geom_bar(position = 'dodge') + geom_text(aes(label=Number))

Então, nós vamos conseguir:

Parece que os textos numéricos também estão posicionados no padrão "dodge". Eu procureimanual geom_text para encontrar alguma informação, mas não pode fazê-lo funcionar.

Sugestões?