ich habe folgenden Code erstellt. Er soll die Rohdaten eines Tests mit den richtigen Lösungen vergleichen und codieren. Danach sollen die Werte aufsummiert werden. Das klappt alles.
Code: Alles auswählen
KFT <- X2017_05_30_Kontrollvariablen_7[1:53, c(1, 9:33)] # Aus dem Datensatz die Spalten (1+9-33) auswählen
sc <- score(KFT[2:26],KFT_7_Lsg,ID = FALSE, output.scored = FALSE)) # Vergleich Spalten Datensazt mit Loesungen
tt <- KFT_7_Testwert
Code: Alles auswählen
p <- as.numeric(sc$score)
# Von innen nach außen:
# tt[,1] := wählt die erste Spalte der Zuordnungstabelle
# match() := Gibt für jeden Wert in x aus, an welcher Position von table dieser zu finden ist. Das Ergebnis ist also ein Vektor mit Positionen.
# Das Ergebnis von match wird dann genutzt, um die richtigen Zeilen in tt auszuwählen. Die Syntax (tt[match(x = sc, table tt[,1]), 2]) soll aber nur den # zweiten Wert ausgeben
tt[match(x = p, table = tt[,1]),2]
Wo liegt der Fehler? Für eure Hilfe bin ich dankbar!