Jak umieścić etykiety nad geom_bar dla każdego paska w R za pomocą ggplot2
Znalazłem to,Jak umieścić etykiety nad geom_bar w R za pomocą ggplot2, ale po prostu umieścił etykiety (liczby) tylko na jednym pasku.
Oto, powiedzmy, dwa słupki dla każdej osi x, jak zrobić to samo?
Moje dane i kod wyglądają tak:
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))
Wtedy otrzymamy:
Wydaje się, że teksty liczb są również umieszczone w schemacie „unik”. Szukałeminstrukcja geom_text znaleźć jakieś informacje, ale nie może to działać.
Propozycje?