Beispiel Geschlechtsunterschiede in der Lesekompetenz

# Datensatz laden
data(PISA2009, package = 'PsyBSc7')
library(ppcor)

Es ist ein regelmäßig replizierter Befund, dass Mädchen in Lesetests besser abschneiden als Jungen. Der Beispieldatensatz entzhält Daten zu Lesekompetenz aus der deutschen Stichprobe der PISA-Erhebung in Deutschland 2009. Enthalten sind die Variablen:

Einfacher Geschlechtseffekt

1.) Bestimmen Sie den "Effekt" des weiblichen Geschlechts (female) auf die Lesekompetenz (Reading) und interpretieren Sie das Ergebnis.

# Das ist auf mehrere Weisen möglich: t-Test, einfache Regression oder die bivariate Korrelation

# t-Test
t.test(PISA2009$Reading ~ PISA2009$Female)

# Regression
reg <- lm(Reading ~ Female, data = PISA2009)
summary(reg)

# Korrelation
cor.test(PISA2009$Female, PISA2009$Reading)

Interpretation der Ergebnisse

Korrelationen Lesekompetenz und Kontrollvariablen

2.) Es ist unwahrscheinlich, dass sich der Besitz eines Y-Chromosoms direkt negativ auf die Lesekompetenz auswirkt. Untersucht werden soll, ob der Geschlechtsunterschied dadurch erklärt werden kann, dass Mädchen mehr für Deutsch lernen oder dass ihnen Lesen mehr Freude macht als Jungen. Untersuchen Sie zunächst die bivariaten Korrelationen von Lesekompetenz (Reading) und Geschlecht (Female) einerseits und den möglichen Einflussvariablen Lernzeit (LearnMins) und Freude am Lesen (JoyRead) andererseits.

a) Korrelation Lesekompetenz - Lernzeit b) Korrelation Lesekompetenz - Freude am Lesen c) Korrelation Geschlecht - Lernzeit d) Korrelation Geschlecht - Freude am Lesen

Können Sie auf Basis dieser Zusammenhänge vermuten, ob eine der beiden Drittvariablen für den Geschlechtsunterschied relevant ist?

#2a Korrelation Lesekompetenz - Lernzeit
cor.test(PISA2009$Reading, PISA2009$LearnMins)

#2b Korrelation Lesekompetenz - Freude am Lesen
cor.test(PISA2009$Reading, PISA2009$JoyRead)

#2c Korrelation Geschlecht - Lernzeit
cor.test(PISA2009$Female, PISA2009$LearnMins)

#2d Korrelation Geschlecht - Freude am Lesen
cor.test(PISA2009$Female, PISA2009$JoyRead)

Interpretation der Zusammenhänge

Partialkorrelationen

3.) Berechnen Sie die Partialkorrelationen zwischen Geschlecht und Lesekompetenz unter Kontrolle von

a) Lernzeit für Deutsch (LearnMins) und b) Freude am Lesen (JoyRead)

# 3a Partialkorrelationen zwischen Geschlecht und Lesekompetenz unter Kontrolle der Lernzeit
pcor.test(x=PISA2009$Reading, y=PISA2009$Female, z=PISA2009$LearnMins)
# 3b Partialkorrelationen zwischen Geschlecht und Lesekompetenz unter Kontrolle der Lesefreude
pcor.test(x=PISA2009$Reading, y=PISA2009$Female, z=PISA2009$JoyRead)

Interpretation der Ergebnisse

Semipartialkorrelationen

4.) Gerichtete (kausale) Effekte der Lernzeit oder Lesefreude auf das Geschlecht werden nach derzeitigem Stand der Forschung für unwahrscheinlich gehalten. Es ist daher zwar sinnvoll, den Zusammenhang von Lernzeit und Lesefreude mit Lesekompetenz zu kontrollieren, nicht jedoch den Zusammenhang von Lernzeit und Lesefreude mit Geschlecht. Berechnen und interpretieren Sie daher den Zusammenhang zwischen Geschlecht und Lesekompetenz,

a) als Semipartialkorrelation, wobei Sie den Effekt von Lernzeit auf Lesekompetenz kontrollieren b) als Semipartialkorrelation, wobei Sie den Effekt von Freude am Lesen auf Lesekompetenz kontrollieren

# 4a Partialkorrelationen zwischen Geschlecht und Lesekompetenz unter
# Kontrolle des Effekts der Lernzeit auf die Lesekompetenz
spcor.test(x=PISA2009$Female, y=PISA2009$Reading, z=PISA2009$LearnMins)
# 4b Partialkorrelationen zwischen Geschlecht und Lesekompetenz unter
# Kontrolle des Effekts der Lesefreude auf die Lesekompetenz
spcor.test(x=PISA2009$Female, y=PISA2009$Reading, z=PISA2009$JoyRead)

Interpretation der Ergebnisse

5.) Berechnen Sie die Partialkorrelationen zwischen Geschlecht und Lesekompetenz unter Kontrolle von zwei Drittvariablen der Lernzeit für Deutsch (LearnMins) und der Freude am Lesen (JoyRead).

``````r

pcor.test(PISA2009$Reading, PISA2009$Female, PISA2009[,c ("LearnMins", "JoyRead")])

```

Interpretation der Ergebnisse



martscht/PsyBSc7 documentation built on Sept. 1, 2020, 10:50 p.m.