He encontrado esto, Cómo poner tags sobre geom_bar en R con ggplot2 , pero solo pone tags (números) en solo una 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, obtendremos:
Parece que los textos numéricos también se ubican en el patrón “esquivar”. He buscado el manual geom_text para encontrar información, pero no puedo hacerlo funcionar.
Sugerencias?
Prueba esto:
ggplot(data=dat, aes(x=Types, y=Number, fill=sample)) + geom_bar(position = 'dodge', stat='identity') + geom_text(aes(label=Number), position=position_dodge(width=0.9), vjust=-0.25)
Para agregar a la respuesta de rcs, si desea usar position_dodge () con geom_bar () cuando x es una fecha POSIX.ct, debe multiplicar el ancho por 86400, por ejemplo,
ggplot(data=dat, aes(x=Types, y=Number, fill=sample)) + geom_bar(position = "dodge", stat = 'identity') + geom_text(aes(label=Number), position=position_dodge(width=0.9*86400), vjust=-0.25)