Hallo,
ich habe einen Datensatz im long-Format vorliegen mit Variablen zur Codierung der ID, der Bedingung (1-4) und dem Wert in einem Fragebogen. Zum Vergleich der Unterschiede in den vier Bedingungen habe ich 4 Boxplots erstellt:
Nun habe ich die Aufgabe, Ausreißer zu identifizieren und in den Abbildungen die jeweiligen IDs darzustellen. Ich habe bereits über boxplot.stats(data$Variable)$out versucht, die Ausreißer zu identifizieren und über mtext der Grafik hinzuzufügen. Im Ergebnis von boxplot.stats()$out werden mir jedoch keine Ausreißer angezeigt (numeric(0)). Ich vermute, dass es daran liegen könnte, dass ich hier nicht nach den Bedingungen gruppiert habe (?). Ist das möglich?
Über is.outlier() werden mir Outlier angezeigt, ich finde hier aber keine geeignete Möglichkeit, die zugehörigen IDs im Boxplot darzustellen. Da es sich um recht viele Outlier handelt, kann man bei geom_text() leider nicht mehr allzu viel erkennen.
Gibt es hier noch andere Möglichkeiten?
Vielen lieben Dank im Voraus und viele Grüße
Sophia
Ausreißer im Boxplot markieren
-
- Beiträge: 7
- Registriert: Mi Jun 02, 2021 4:25 pm
Re: Ausreißer im Boxplot markieren
Bitte ein reproduzierbares Beispiel posten.
Bitte immer ein reproduzierbares Minimalbeispiel angeben. Meinungen gehören mir und geben nicht die meines Brötchengebers wieder.
Dieser Beitrag ist lizensiert unter einer CC BY 4.0 Lizenz
.
Dieser Beitrag ist lizensiert unter einer CC BY 4.0 Lizenz
.
-
- Beiträge: 7
- Registriert: Mi Jun 02, 2021 4:25 pm
Re: Ausreißer im Boxplot markieren
Hier habe ich meinen bisherigen Code für die ersten 5 Versuchspersonen meines Datensatzes:
Als Dateianhang habe ich den Datensatz hinzugefügt.
Genügt das zur Reproduktion oder fehlen noch weitere Infos?
Vielen Dank im Voraus!
Code: Alles auswählen
data <- read.csv('data')
res.aov_1 <- get_anova_table(anova_test(
data = data, dv = Variable, wid = id, within = Bedingung))
pwc_1 <- data %>%
pairwise_t_test(Variable ~ Bedingung, paired = TRUE,p.adjust.method = "bonferroni")%>%
add_xy_position(x = "Bedingung")
bxp_1 <- ggboxplot(data, x = "Bedingung", y = "Variable", add = "point", color = "Bedingung", palette = "npg") +
stat_pvalue_manual(pwc_1)+
labs(subtitle = get_test_label(res.aov_1, detailed = TRUE), caption = get_pwc_label(pwc_1)) +
stat_summary (fun=mean, geom="crossbar", color="orange")
bxp_1
Genügt das zur Reproduktion oder fehlen noch weitere Infos?
Vielen Dank im Voraus!
- Dateianhänge
-
- data.csv
- (504 Bytes) 75-mal heruntergeladen
-
- Beiträge: 7
- Registriert: Mi Jun 02, 2021 4:25 pm
Re: Ausreißer im Boxplot markieren
Ansonsten würde es mir auch erst einmal reichen, in einer neuen Spalte im Datensatz mit 0 und 1 zu codieren, ob es sich um einen Ausreißer handelt oder nicht. Leider weiß ich nicht, wie ich die Ergebnisse, die ich über identify_outlier() erhalte, "übertragen" kann
Re: Ausreißer im Boxplot markieren
Hallo Sophia.
LG,
Bernhard
Die bei Deiner Arbeit verwendeten packages könnten helfen. Allgemein käme man so an die DAten:SophiaSchi hat geschrieben: ↑Mo Jun 21, 2021 4:12 pmGenügt das zur Reproduktion oder fehlen noch weitere Infos?
Code: Alles auswählen
d <- read.csv("http://forum.r-statistik.de/download/file.php?id=1498")
bp <- boxplot(Variable ~ Bedingung, data = d)
text(bp$group+.1, bp$out + .1, labels = round(bp$out,2))
axis(4, bp$out)
Bernhard
---
Programmiere stets so, dass die Maxime Deines Programmierstils Grundlage allgemeiner Gesetzgebung sein könnte
Programmiere stets so, dass die Maxime Deines Programmierstils Grundlage allgemeiner Gesetzgebung sein könnte