Diese Musterlösung wurde erstellt von Peter Hähner (Ruhr-Universität Bochum).

(c) Luhmann: R für Einsteiger, 5. Aufl., Beltz, 2020

Vorbereitungen

Setzen Sie ein Arbeitsverzeichnis oder legen Sie ein entsprechendes R-Projekt an (Kap. 23).

Laden Sie dann die Datei erstis.RData.

load("erstis.RData")

Aufgabe 1

Untersuchen Sie, ob sich Frauen und Männer (geschl) signifikant darin unterschieden, ob sie die Studienberatung (uni) in Anspruch genommen haben.

chisq.test(table(erstis$geschl, erstis$uni1))
## 
##  Pearson's Chi-squared test with Yates' continuity correction
## 
## data:  table(erstis$geschl, erstis$uni1)
## X-squared = 1.1476, df = 1, p-value = 0.284

Männer und Frauen unterscheiden sich nicht darin, inwieweit sie die Studienberatung in Anspruch genommen haben (χ2(1) = 1.15, p = .284).

Aufgabe 2

Die Items zur Lebenszufriedenheit (lz13 bis lz17) wurden auf einem siebenstufigen Antwortformat beantwortet. Überprüfen Sie, ob beim Item lz13 im Mittel die mittlere Antwortkategorie 4 angekreuzt wurde.

wilcox.test(erstis$lz13, mu = 4)
## 
##  Wilcoxon signed rank test with continuity correction
## 
## data:  erstis$lz13
## V = 9839.5, p-value = 3.855e-12
## alternative hypothesis: true location is not equal to 4

Die Antworten beim Item lz13 unterscheiden sich signifikant von der mittleren Antwortkategorie 4 (V = 9839.50, p < .001).

Aufgabe 3

Unterscheiden sich Personen mit Kindern und Personen ohne Kinder (kinder) in Bezug auf das Item lz17.

wilcox.test(lz17 ~ kinder, data = erstis)
## 
##  Wilcoxon rank sum test with continuity correction
## 
## data:  lz17 by kinder
## W = 1903, p-value = 0.7303
## alternative hypothesis: true location shift is not equal to 0

Personen mit Kindern und ohne Kinder unterscheiden sich nicht signifikant in ihrer Beantwortung des Items lz17, (W = 1903, p = .730).

Aufgabe 4

Unterscheiden sich die Antworten auf das Item lz13 von den Antworten auf das Item lz17? Beantworten Sie diese Frage mit Hilfe eines Wilcoxon-Tests für abhängige Stichproben.

wilcox.test(erstis$lz13, erstis$lz17, paired = TRUE)
## 
##  Wilcoxon signed rank test with continuity correction
## 
## data:  erstis$lz13 and erstis$lz17
## V = 5721.5, p-value = 0.001801
## alternative hypothesis: true location shift is not equal to 0

Die Antworten auf das Item lz13 und lz17unterscheiden sich signifikant voneinander (V = 5721.50, p = .002).

Aufgabe 5

Prüfen Sie, ob der Wohnort vor 12 Monaten (wohnort.alt) einen Effekt auf die Antworten auf das Item lz14 hat.

kruskal.test(lz14 ~ wohnort.alt, data = erstis)
## 
##  Kruskal-Wallis rank sum test
## 
## data:  lz14 by wohnort.alt
## Kruskal-Wallis chi-squared = 4.9111, df = 3, p-value = 0.1784

Der Wohnort hat keinen signifikanten Effekt auf die Antworten auf das Item lz142(3) = 4.91, p = .178).