DATASET ACTIVATE DataSet1. USE ALL. FILTER BY filter_1. EXECUTE. SORT CASES BY Condition. SPLIT FILE LAYERED BY Condition. FREQUENCIES VARIABLES=Dog Trolley Wallet Plane Resume Kitten /FORMAT=NOTABLE /HISTOGRAM /ORDER=ANALYSIS. SPLIT FILE OFF. RECODE Dog Trolley Wallet Plane Resume Kitten (10=1) (ELSE=0) INTO DogDich TrolleyDich WalletDich PlaneDich ResumeDich KittenDich. EXECUTE. COMPUTE SumDich=DogDich + TrolleyDich + WalletDich + PlaneDich + ResumeDich + KittenDich. EXECUTE. FREQUENCIES VARIABLES=DogDich TrolleyDich WalletDich PlaneDich ResumeDich KittenDich SumDich /ORDER=ANALYSIS. USE ALL. COMPUTE filter_$=(filter_1 & SumDich <= 4). VARIABLE LABELS filter_$ 'filter_1 & SumDich <= 4 (FILTER)'. VALUE LABELS filter_$ 0 'Not Selected' 1 'Selected'. FORMATS filter_$ (f1.0). FILTER BY filter_$. EXECUTE. COMPUTE Sincerity=HH#1 + (6-HH#5) + HH#9. COMPUTE Honesty=(6-HH#2) + HH#6 + (6 - HH#10). EXECUTE. COMPUTE Mean_DPK=MEAN(Dog, Plane, Kitten). COMPUTE Mean_WR=MEAN(Wallet, Resume). EXECUTE.