ich sitze gerade an einer Aufgabe und bekomme leider eine Fehlermeldung.
Weiß jemand woran das liegen könnte/wo mein fehler ist?
# Führe eine gemischte Zwei-Wege-ANOVA auf dem "anxiety" Datensatz aus dem "datarium" Paket durch. Die abhängige Variable ist der Angstscore, der zu drei verschiedenen Zeitpunkten (t1, t2, t3) gemessen wird. Die unabhängigen Variablen sind die Gruppen (grp1: basal, grp2: moderat, grp3: hoch) und die Zeit. Ziel ist es zu prüfen, ob es eine Interaktion zwischen Gruppe und Zeit bei der Erklärung des Angstscores gibt.
Code: Alles auswählen
install.packages("datarium")
install.packages("tidyverse")
install.packages("rstatix")
# Pakete laden
library(tidyverse)
library(datarium)
library(rstatix)
library(ggpubr)
# Daten laden und vorbereiten
set.seed(123)
data("anxiety", package = "datarium")
# Voraussetzungen prüfen
bxp <- ggboxplot(
anxiety, x = "time", y = "score",
color = "group", palette = "jco"
)
bxp
Code: Alles auswählen
Error in `purrr::pmap()`:
ℹ In index: 1.
ℹ With name: score.
Caused by error in `[[<-.data.frame`:
! Ersetzung hat 0 Zeilen, Daten haben 45
Run `rlang::last_trace()` to see where the error occurred.
> rlang::last_trace()
<error/purrr_error_indexed>
Error in `purrr::pmap()`:
ℹ In index: 1.
ℹ With name: score.
Caused by error in `[[<-.data.frame`:
! Ersetzung hat 0 Zeilen, Daten haben 45
---
Backtrace:
▆
1. └─ggpubr::ggboxplot(...)
2. ├─base::do.call(.plotter, .opts)
3. └─ggpubr (local) `<fn>`(...)
4. └─purrr::pmap(...)
5. └─purrr:::pmap_("list", .l, .f, ..., .progress = .progress)
6. ├─purrr:::with_indexed_errors(...)
7. │ └─base::withCallingHandlers(...)
8. ├─purrr:::call_with_cleanup(...)
9. └─ggpubr (local) .f(...)
10. ├─base::`[[<-`(`*tmp*`, x, value = `<fct>`)
11. └─base::`[[<-.data.frame`(`*tmp*`, x, value = `<fct>`)
12. └─base::stop(...)
Run rlang::last_trace(drop = FALSE) to see 4 hidden frames.
> rlang::last_trace(drop = FALSE)
<error/purrr_error_indexed>
Error in `purrr::pmap()`:
ℹ In index: 1.
ℹ With name: score.
Caused by error in `[[<-.data.frame`:
! Ersetzung hat 0 Zeilen, Daten haben 45
---
Backtrace:
▆
1. ├─ggpubr::ggboxplot(...)
2. │ ├─base::do.call(.plotter, .opts)
3. │ └─ggpubr (local) `<fn>`(...)
4. │ └─purrr::pmap(...)
5. │ └─purrr:::pmap_("list", .l, .f, ..., .progress = .progress)
6. │ ├─purrr:::with_indexed_errors(...)
7. │ │ └─base::withCallingHandlers(...)
8. │ ├─purrr:::call_with_cleanup(...)
9. │ └─ggpubr (local) .f(...)
10. │ ├─base::`[[<-`(`*tmp*`, x, value = `<fct>`)
11. │ └─base::`[[<-.data.frame`(`*tmp*`, x, value = `<fct>`)
12. │ └─base::stop(...)
13. └─base::.handleSimpleError(...)
14. └─purrr (local) h(simpleError(msg, call))
15. └─cli::cli_abort(...)
16. └─rlang::abort(...)
Viele Grüße
Mar204