** Reverse-score the negatively-keyed RMob items ** RECODE rmob4 rmob5 rmob7 rmob9 rmob11 rmob12 (1=6) (2=5) (3=4) (4=3) (5=2) (6=1) INTO rmob4r rmob5r rmob7r rmob9r rmob11r rmob12r. EXECUTE. ** Create RMob individual means ** COMPUTE rmob_ave=mean(rmob1,rmob2,rmob3,rmob4r,rmob5r,rmob6,rmob7r,rmob8,rmob9r,rmob10,rmob11r,rmob12r). EXECUTE.