He encontrado esto,Cómo poner etiquetas sobre geom_bar en R con ggplot2, pero solo pone etiquetas (números) sobre una sola barra.

Aquí hay, digamos, dos barras para cada eje x, ¿cómo hacer lo mismo?

Mis datos y código se ven así:

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))

Entonces, vamos a obtener:

Parece que los textos numéricos también están posicionados en el patrón "esquivar". He buscadomanual geom_text para encontrar alguna información, pero no puede hacer que funcione.

Sugerencias?