* Encoding: UTF-8. *make variables that are needed for positive risk-taking RECODE A30vacc_zelf_1 A60vacc_zelf_1 A90vacc_zelf_1 A30vacc_zelf_2 A60vacc_zelf_2 A90vacc_zelf_2 (5=1) (4=2) (3=3) (2=4) (1=5) INTO P30_distance P60_distance P90_distance E30_distance E60_distance E90_distance. EXECUTE. RECODE A30vacc_zelf_4 A60vacc_zelf_4 A90vacc_zelf_4 A30vacc_zelf_3 A60vacc_zelf_3 A90vacc_zelf_3 (ELSE=Copy) INTO E30_contact E60_contact E90_contact P30_contact P60_contact P90_contact. EXECUTE. COMPUTE E30_M=MEAN(E30_distance,E30_contact). COMPUTE E60_M=MEAN(E60_distance,E60_contact). COMPUTE E90_M=MEAN(E90_distance,E90_contact). COMPUTE P30_M=MEAN(P30_distance,P30_contact). COMPUTE P60_M=MEAN(P60_distance,P60_contact). COMPUTE P90_M=MEAN(P90_distance,P90_contact). COMPUTE A30_M=MEAN(P30_M,E30_M). COMPUTE A60_M=MEAN(P60_M,E60_M). COMPUTE A90_M=MEAN(P90_M,E90_M). COMPUTE P_M=MEAN(P30_M,P60_M,P90_M). COMPUTE E_M=MEAN(E30_M,E60_M,E90_M). COMPUTE MeanD_M=(P_M-E_M). COMPUTE MeanA_Mincrease=A90_M-A30_M. RECODE MeanA_Mincrease (-1 thru 1=1). EXECUTE. *recode demographic variables RECODE Leeftijd (ELSE=Copy) INTO AgeC. EXECUTE. RECODE gender (1=0) (2=1) (ELSE=SYSMIS) INTO GenderC. EXECUTE. COMPUTE AgeQuad=AgeC * AgeC. EXECUTE. * make scale scores primary variables COMPUTE Sensation_seek=MEAN(sensationseeking_1,sensationseeking_2,sensationseeking_3,sensationseeking_4, sensationseeking_5,sensationseeking_6,sensationseeking_7,sensationseeking_8). EXECUTE. COMPUTE Negative_risk=MEAN(Vrijheidcreeren_zelf_1,Vrijheidcreeren_zelf_2,Vrijheidcreeren_zelf_3). EXECUTE. COMPUTE Positive_risk=MeanD_M*MeanA_Mincrease. COMPUTE Pos_peers=MEAN(P30_M,P60_M,P90_M). COMPUTE Pos_elderly=MEAN(E30_M,E60_M,E90_M). *make scale scores secondary variables COMPUTE Prosocial_need=MEAN(Pandemielijst_2,Pandemielijst_4). EXECUTE. COMPUTE Prosocial_opportunity=MEAN(Pandemielijst_3,Pandemielijst_5,Pandemielijst_6). EXECUTE. RECODE Cijfer_leven_1 (ELSE=Copy) INTO Life_satisfaction. EXECUTE. * make missing data variables COUNT Missing_number=Sensation_seek Negative_risk Positive_risk Prosocial_need Prosocial_opportunity Life_satisfaction(MISSING). EXECUTE. FREQUENCIES VARIABLES=Missing_number /ORDER=ANALYSIS. RECODE Missing_number (6=1) (ELSE=0) INTO Missing_all. EXECUTE. RECODE Missing_number (1 thru 5=1) (ELSE=0) INTO Missing_some. EXECUTE. *shorten variables in order to use PROCESS macro RECODE Sensation_seek Negative_risk Positive_risk Prosocial_need Prosocial_opportunity (ELSE=Copy) INTO sens neg pos need oppor. EXECUTE.