aktuell führe ich eine Auswertung in R durch. Dabei möchte ich den Test zur Split-Half-Reliabilität vornehmen. Die eingegebene Funktion lautet:
Code: Alles auswählen
dat <- read.csv2("http://forum.r-statistik.de/download/file.php?id=601")
test1 <- cbind(Ressource1, Ressource2, Ressource3, Ressource4, Ressource5, Ressource6, Ressource7, Ressource8, Ressource9, Ressource10, Ressource11, Ressource12, Ressource13, Ressource14, Ressource15, Ressource16, Ressource17)
score <- apply(test1, 1, sum)
test2 <- cbind(Ressource18, Ressource19, Ressource20, Ressource21, Ressource22, Ressource23, Ressource24, Ressource25, Ressource26, Ressource27, Ressource28, Ressource29, Ressource30, Ressource31, Ressource32, Ressource33, Ressource34)
score <- apply(test2, 1, sum)
r_tt <- cor(score1, score2)
r_tt
Freundliche Grüße
Gerhard