eine totale Anfängerfrage, ich bin gerade erst dabei, mir die Welt von R zu erschließen.
Ich möchte für jede Person einzeln den Summenwert eines Testes erhalten. In diesem hat jedes Item einen Wert, trifft das Item zu, erhält die Person den Wert, trifft es nicht zu, erhält sie in dem Item den Wert 0. Soweit habe ich es jetzt schon programmiert:
SRRSdamals$SR01_30r<-recode(SRRSdamals$SR01_30,"2=23;1=0")
SRRSdamals$SR01_24r<-recode(SRRSdamals$SR01_24,"2=29;1=0")
SRRSdamals$SR01_08r<-recode(SRRSdamals$SR01_08,"2=47;1=0")
SRRSdamals$SR01_25r<-recode(SRRSdamals$SR01_25,"2=28;1=0")
SRRSdamals$SR01_26r<-recode(SRRSdamals$SR01_26,"2=26;1=0")
SRRSdamals$SR01_27r<-recode(SRRSdamals$SR01_27,"2=26;1=0")
SRRSdamals$SR01_09r<-recode(SRRSdamals$SR01_09,"2=45;1=0")
SRRSdamals$SR01_06r<-recode(SRRSdamals$SR01_06,"2=53;1=0")
SRRSdamals$SR01_04r<-recode(SRRSdamals$SR01_04,"2=63;1=0")
SRRSdamals$SR01_15r<-recode(SRRSdamals$SR01_15,"2=15;1=0")
SRRSdamals$SR01_20r<-recode(SRRSdamals$SR01_20,"2=31;1=0")
SRRSdamals$SR01_07r<-recode(SRRSdamals$SR01_07,"2=50;1=0")
SRRSdamals$SR01_03r<-recode(SRRSdamals$SR01_03,"2=65;1=0")
SRRSdamals$SR01_14r<-recode(SRRSdamals$SR01_14,"2=39;1=0")
SRRSdamals$SR01_02r<-recode(SRRSdamals$SR01_02,"2=73;1=0")
SRRSdamals$SR01_12r<-recode(SRRSdamals$SR01_12,"2=40;1=0")
SRRSdamals$SR01_13r<-recode(SRRSdamals$SR01_13,"2=39;1=0")
SRRSdamals$SR01_01r<-recode(SRRSdamals$SR01_01,"2=100;1=0")
SRRSdamals$SR01_17r<-recode(SRRSdamals$SR01_17,"2=37;1=0")
SRRSdamals$SR01_05r<-recode(SRRSdamals$SR01_05,"2=63;1=0")
SRRSdamals$SR01_31r<-recode(SRRSdamals$SR01_31,"2=20;1=0")
SRRSdamals$SR01_16r<-recode(SRRSdamals$SR01_16,"2=38;1=0")
SRRSdamals$SR01_11r<-recode(SRRSdamals$SR01_11,"2=44;1=0")
SRRSdamals$SR01_29r<-recode(SRRSdamals$SR01_29,"2=24;1=0")
SRRSdamals$SR01_40r<-recode(SRRSdamals$SR01_40,"2=15;1=0")
SRRSdamals$SR01_18r<-recode(SRRSdamals$SR01_18,"2=36;1=0")
SRRSdamals$SR01_28r<-recode(SRRSdamals$SR01_28,"2=25;1=0")
SRRSdamals$SR01_38r<-recode(SRRSdamals$SR01_38,"2=16;1=0")
SRRSdamals$SR01_19r<-recode(SRRSdamals$SR01_19,"2=35;1=0")
SRRSdamals$SR01_22r<-recode(SRRSdamals$SR01_22,"2=29;1=0")
SRRSdamals$SR01_32r<-recode(SRRSdamals$SR01_32,"2=20;1=0")
SRRSdamals$SR01_39r<-recode(SRRSdamals$SR01_39,"2=15;1=0")
SRRSdamals$SR01_34r<-recode(SRRSdamals$SR01_34,"2=19;1=0")
SRRSdamals$SR01_33r<-recode(SRRSdamals$SR01_33,"2=20;1=0")
SRRSdamals$SR01_35r<-recode(SRRSdamals$SR01_35,"2=19;1=0")
SRRSdamals$SR01_36r<-recode(SRRSdamals$SR01_36,"2=18;1=0")
SRRSdamals$SR01_23r<-recode(SRRSdamals$SR01_23,"2=29;1=0")
SRRSdamals$SR01_37r<-recode(SRRSdamals$SR01_37,"2=17;1=0")
SRRSdamals$SR01_10r<-recode(SRRSdamals$SR01_10,"2=45;1=0")
SRRSdamals$SR01_21r<-recode(SRRSdamals$SR01_21,"2=30;1=0")
dann habe ich aus dem ursprünglichen Test (SRRSdamals) das Subset mit den richtig kodierten Werten angelegt:
SRRSdamalsreduz<-subset(SRRSdamals,select = SR01_30r:SR01_21r)
Über die sum oder mean-funktion erhalte ich immer den Fehler:
Warning message:
In mean.default(SRRSdamalsreduz, na.rm = TRUE) :
argument is not numeric or logical: returning NA
Was bedeutet das "nicht numerisch"? wie kann ich meine werte ins numerische bekommen?
vielen dank für eure hilfe!
liebe grüße, lela