Du kannst die einzelnen Häufigkeiten pro Ausprägung hinzufügen. Dazu nutzt du die Funktion geom_text()
und fügst diese einfach dem letzten Plot hinzu: Das erste Argument gibt an, dass hier die Häufigkeiten genutzt werden und im zweiten Argument gibst du an, dass die Ausgabe eben die gezählte Häufigkeit sein soll (label = ..count..`):
barplotBeyonce +
geom_text(
stat = "count",
aes(label = ..count..)
)
## Warning: The dot-dot notation (`..count..`) was deprecated in ggplot2 3.4.0.
## ℹ Please use `after_stat(count)` instead.
## This warning is displayed once every 8 hours.
## Call `lifecycle::last_lifecycle_warnings()` to see where this warning was
## generated.
Jetzt ist es so, dass die Zahlen teils nicht lesbar sind. Verschieben wir die Zahlenwerte und ändern die Schriftfarbe! Die Position und das Erscheinungsbild können wir mit verschiedenen Argumenten innerhalb von geom_text()
verändern:
barplotBeyonce +
geom_text(
stat = "count",
aes(label = ..count..),
vjust = 1.5,
color = "white"
)
Verändere den Code oben so, dass die Zahlen über den Balken sind und die Schriftart darkblue
ist! Probier dich erst ein bisschen aus, bevor du auf die Lösung schaust!
barplotBeyonce +
geom_text(
stat = “count”,
aes(label = ..count..),
vjust = -0.5,
color = “darkblue”
)
Die Größe des Texts kannst du zusätzlich über das Argument size
anpassen. Ändere im Code einfach mal die Werte, um zu sehen, wie es sich verändert!
barplotBeyonce +
geom_text(
stat = "count",
aes(label = ..count..),
vjust = 1.5,
size = 8,
color = "white"
)
Weiter geht’s zu den letzten Einstellungen!