Ich habe folgendes Problem:
Die Ergebnisse einer ANOVA und des Tukey-Tests möchte ich gerne mit ggplot grafisch darstellen. Grundsätzlich schaffe ich es, ein Balkendiagramm mit Standardabweichung zu erstellen und die beiden Tests durchzuführen.
Mir fehlt im Diagramm jedoch noch die Signifikanzentscheidung anhand der Buchstaben, die über dem jeweiligen Balken stehen sollen.
Habe dazu mal ein kleines Beispiel vorbereitet:
Code: Alles auswählen
library(tidyverse)
library(agricolae)
Beispiel <-data.frame(Variante=factor(c(1,1,1,1,1,2,2,2,2,2,3,3,3,3,3)),
Messwert=c(64,87,54,98,14,5,8,9,9,2,12,15,7,8,7))
AOV_Beispiel <- aov(Messwert~Variante, data = Beispiel)
Tukey_Beispiel <-HSD.test(AOV_Beispiel,"Variante",
group = TRUE,
console = TRUE)
Code: Alles auswählen
Messwert groups
1 63.4 a
3 9.8 b
2 6.6 b
Gibt es eine einfache, automatische und möglichst elegante Lösung, diese gängige Darstellungsweise mit ggplot zu erreichen?
Gruß
Flip