Argument ist nicht numerisch
Verfasst: Mo Mai 22, 2023 6:41 pm
Hallo zusammen,
ich bekomme in folgender Aufgabe die Meldung:
Aufgabe und meine Lösung:
Wie muss ich meinen Code ändern sodass das argument numerisch ist?
Danke für euere Antworten!
ich bekomme in folgender Aufgabe die Meldung:
Code: Alles auswählen
test_result <- wilcox.test(chick_diet1$ordinal_weight_numeric, mu = 2)
Error in wilcox.test.default(chick_diet1$ordinal_weight_numeric, mu = 2) :
'x' muss numerisch sein
Code: Alles auswählen
# a) Lade den Datensatz "ChickWeight" und führe eine explorative Datenanalyse durch. Gib die ersten sechs Zeilen des Datensatzes aus und erstelle eine Zusammenfassung der Daten. Berechne den Median des Küken-Gewichts für den gesamten Datensatz.
# Laden des Datensatzes
data(ChickWeight, package = "datasets")
# Erste sechs Zeilen anzeigen
head(ChickWeight)
# Zusammenfassung der Daten
summary(ChickWeight)
# Median des Küken-Gewichts berechnen
median_chickweight <- median(ChickWeight$weight)
median_chickweight
# b) Erstelle einen Boxplot für das Küken-Gewicht für den gesamten Datensatz.
# Boxplot erstellen
boxplot(ChickWeight$weight, main = "Boxplot of Chick Weight", ylab = "Weight (g)")
# c) Filter den Datensatz auf die Daten von Küken, die mit Futtertyp 1 (Diet 1) gefüttert wurden.
# Filtern des Datensatzes auf Futtertyp 1
chick_diet1 <- ChickWeight[ChickWeight$Diet == 1, ]
# d) Konvertiere das Gewicht der Küken (Spalte "weight") in eine ordinalskalierte Variable, indem du die Gewichte in vier Kategorien einteilst: sehr leicht = „1“, leicht = „2“, schwer = „3“ und sehr schwer = „4“. Hierfür kannst du die Funktion "cut()" in R verwenden.
chick_diet1$ordinal_weight_numeric <- cut(chick_diet1$weight, breaks = 4, labels = c("sehr leicht" = 1, "leicht" = 2, "schwer" = 3, "sehr schwer" = 4))
head(chick_diet1)
# e) Berechne die Häufigkeiten der Gewichtskategorien im Datensatz und führe den Einstichproben-Wilcoxon-Test durch, um zu testen, ob der Median der ordinalskalierten Gewichtskategorie signifikant von der Kategorie "leicht" abweicht. Verwenden Sie hierfür die Funktion "wilcox.test()" in R.
# Berechnung der Häufigkeit der Gewichtskategorien
table(chick_diet1$ordinal_weight_numeric)
# Durchführen des Einstichproben-Wilcoxon-Tests
test_result <- wilcox.test(chick_diet1$ordinal_weight_numeric, mu = 2)
Danke für euere Antworten!