Wie man mit ggplot2 Beschriftungen über geom_bar für jeden Balken in R setzt

Ich habe das gefunden,So platzieren Sie mit ggplot2 Labels über geom_bar in R, aber es werden nur Etiketten (Zahlen) über nur einen Balken gelegt.

Hier sind zum Beispiel zwei Balken für jede x-Achse, wie macht man dasselbe?

Meine Daten und mein Code sehen folgendermaßen aus:

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

Dann bekommen wir:

Es scheint, dass die Zahlentexte auch im "Ausweich" -Muster positioniert sind. Ich habe gesuchtGeotext-Handbuch um einige Informationen zu finden, aber es funktioniert nicht.

Vorschläge?

Antworten auf die Frage(2)

Ihre Antwort auf die Frage