* Encoding: UTF-8.
*Descriptives and Randomisation Checks*
*Session 1*

DATASET ACTIVATE DataSet1.
USE ALL.

# Pre-exclusion sample 

FREQUENCIES VARIABLES=Gender
  /ORDER=ANALYSIS.

DESCRIPTIVES VARIABLES=Age
  /STATISTICS=MEAN STDDEV MIN MAX.

#Add filter for those excluded at S1 and get sample characteristics for remaining

USE ALL.
COMPUTE filter_$=(S1_EXCL = 1).
VARIABLE LABELS filter_$ 'S1_EXCL = 1 (FILTER)'.
VALUE LABELS filter_$ 0 'Not Selected' 1 'Selected'.
FORMATS filter_$ (f1.0).
FILTER BY filter_$.
EXECUTE.

FREQUENCIES VARIABLES=Gender
  /ORDER=ANALYSIS.

DESCRIPTIVES VARIABLES=Age
  /STATISTICS=MEAN STDDEV MIN MAX.

UNIANOVA Age BY Condition
  /METHOD=SSTYPE(3)
  /INTERCEPT=INCLUDE
  /PRINT ETASQ DESCRIPTIVE OPOWER
  /CRITERIA=ALPHA(.05)
  /DESIGN=Condition 

CROSSTABS
  /TABLES=Gender BY Condition
  /FORMAT=AVALUE TABLES
  /STATISTICS=CHISQ 
  /CELLS=COUNT
  /COUNT ROUND CELL.

#Filter out those excluded in S2 as well, and get sample characteristics

USE ALL.
COMPUTE filter_$=(S2_EXCL = 1).
VARIABLE LABELS filter_$ 'S2_EXCL = 1 (FILTER)'.
VALUE LABELS filter_$ 0 'Not Selected' 1 'Selected'.
FORMATS filter_$ (f1.0).
FILTER BY filter_$.
EXECUTE.

FREQUENCIES VARIABLES=Gender
  /ORDER=ANALYSIS.

DESCRIPTIVES VARIABLES=Age
  /STATISTICS=MEAN STDDEV MIN MAX.

UNIANOVA Age BY Condition
  /METHOD=SSTYPE(3)
  /INTERCEPT=INCLUDE
  /PRINT ETASQ DESCRIPTIVE OPOWER
  /CRITERIA=ALPHA(.05)
  /DESIGN=Condition

CROSSTABS
  /TABLES=Gender BY Condition
  /FORMAT=AVALUE TABLES
  /STATISTICS=CHISQ 
  /CELLS=COUNT
  /COUNT ROUND CELL.

*Learning Analyses*
*Session 1*

USE ALL.
COMPUTE filter_$=(S1_EXCL = 1).
VARIABLE LABELS filter_$ 'S1_EXCL = 1 (FILTER)'.
VALUE LABELS filter_$ 0 'Not Selected' 1 'Selected'.
FORMATS filter_$ (f1.0).
FILTER BY filter_$.
EXECUTE.

GLM HFRT1_S1 HFRT2_S1 HFRT3_S1 HFRT4_S1 HFRT5_S1 BY Condition 
  /WSFACTOR=BLOCK 5 Polynomial 
  /METHOD=SSTYPE(3)
  /EMMEANS=TABLES(OVERALL) 
  /EMMEANS=TABLES(Condition) COMPARE ADJ(BONFERRONI)
  /EMMEANS=TABLES(BLOCK) COMPARE ADJ(BONFERRONI)
  /EMMEANS=TABLES(Condition*BLOCK) 
  /PRINT=DESCRIPTIVE ETASQ OPOWER 
  /CRITERIA=ALPHA(.05)
  /WSDESIGN=BLOCK 
  /DESIGN=Condition

GLM UFcommERR1_S1 UFcommERR2_S1 UFcommERR3_S1 UFcommERR4_S1 UFcommERR5_S1 BY Condition 
  /WSFACTOR=BLOCK 5 Polynomial 
  /METHOD=SSTYPE(3)
  /EMMEANS=TABLES(OVERALL) 
  /EMMEANS=TABLES(Condition) COMPARE ADJ(BONFERRONI)
  /EMMEANS=TABLES(BLOCK) COMPARE ADJ(BONFERRONI)
  /EMMEANS=TABLES(Condition*BLOCK) 
  /PRINT=DESCRIPTIVE ETASQ OPOWER 
  /CRITERIA=ALPHA(.05)
  /WSDESIGN=BLOCK 
  /DESIGN=Condition

*Learning Analyses*
*Session 2*

USE ALL.
COMPUTE filter_$=(S2_EXCL = 1).
VARIABLE LABELS filter_$ 'S2_EXCL = 1 (FILTER)'.
VALUE LABELS filter_$ 0 'Not Selected' 1 'Selected'.
FORMATS filter_$ (f1.0).
FILTER BY filter_$.
EXECUTE.

GLM HFRT1_S2 HFRT2_S2 HFRT3_S2 BY Condition 
  /WSFACTOR=BLOCK 3 Polynomial 
  /METHOD=SSTYPE(3)
  /EMMEANS=TABLES(OVERALL) 
  /EMMEANS=TABLES(Condition) COMPARE ADJ(BONFERRONI)
  /EMMEANS=TABLES(BLOCK) COMPARE ADJ(BONFERRONI)
  /EMMEANS=TABLES(Condition*BLOCK) COMPARE (BLOCK) ADJ(LSD)
  /PRINT=DESCRIPTIVE ETASQ OPOWER 
  /CRITERIA=ALPHA(.05)
  /WSDESIGN=BLOCK 
  /DESIGN=Condition

GLM UFcommERR1_S2 UFcommERR2_S2 UFcommERR3_S2 BY Condition
  /WSFACTOR=BLOCK 3 Polynomial 
  /METHOD=SSTYPE(3)
  /EMMEANS=TABLES(OVERALL) 
  /EMMEANS=TABLES(Condition) COMPARE ADJ(BONFERRONI)
  /EMMEANS=TABLES(BLOCK) COMPARE ADJ(BONFERRONI)
  /EMMEANS=TABLES(Condition*BLOCK) 
  /PRINT=DESCRIPTIVE ETASQ OPOWER 
  /CRITERIA=ALPHA(.05)
  /WSDESIGN=BLOCK 
  /DESIGN=Condition

*Training effects on food choice split by task*
*Food Choice 1*

USE ALL.
COMPUTE filter_$=(S1_EXCL = 1).
VARIABLE LABELS filter_$ 'S1_EXCL = 1 (FILTER)'.
VALUE LABELS filter_$ 0 'Not Selected' 1 'Selected'.
FORMATS filter_$ (f1.0).
FILTER BY filter_$.
EXECUTE.

UNIANOVA HealthyChoiceS1 BY Condition
  /METHOD=SSTYPE(3)
  /INTERCEPT=INCLUDE
  /EMMEANS=TABLES(OVERALL) 
  /EMMEANS=TABLES(Condition) COMPARE ADJ(BONFERRONI)
  /PRINT ETASQ DESCRIPTIVE OPOWER
  /CRITERIA=ALPHA(.05)
  /DESIGN=Condition.

T-TEST GROUPS=Condition(1 3)
  /MISSING=ANALYSIS
  /VARIABLES=HealthyChoiceS1
  /CRITERIA=CI(.95).

T-TEST GROUPS=Condition(2 3)
  /MISSING=ANALYSIS
  /VARIABLES=HealthyChoiceS1
  /CRITERIA=CI(.95).

USE ALL.
COMPUTE filter_$=(S2_EXCL = 1).
VARIABLE LABELS filter_$ 'S2_EXCL = 1 (FILTER)'.
VALUE LABELS filter_$ 0 'Not Selected' 1 'Selected'.
FORMATS filter_$ (f1.0).
FILTER BY filter_$.
EXECUTE.

GLM HealthyChoiceS1 HealthyChoiceS2a HealthyChoice_S2b BY Condition
  /WSFACTOR=TIME 3 Polynomial 
  /METHOD=SSTYPE(3)
  /EMMEANS=TABLES(OVERALL) 
  /EMMEANS=TABLES(Condition) COMPARE ADJ(BONFERRONI)
  /EMMEANS=TABLES(TIME) COMPARE ADJ(BONFERRONI)
  /EMMEANS=TABLES(Condition*TIME) 
  /PRINT=DESCRIPTIVE ETASQ OPOWER 
  /CRITERIA=ALPHA(.05)
  /WSDESIGN=TIME 
  /DESIGN=Condition.