*  This is file GENDER.SAS  ;
TITLE 'Gender role playing affect on personality assessment';
*     Create data set    ;
DATA;
     infile gender;
     input S G R G1 R1;
     GR=G*R;
     GR1=G1*R1;
     LABEL S='Personality Score'
           G='dummy variable = 1 if female'
           R='dummy variable = 1 if role play'
           G1='dummy variable, 1 if male, -1 if female'
           R1='dummy variable, 1 if honest, -1 if role'
           GR1='interaction of G1 and R1'
           GR='interaction of G and R';
*     Analysis of variance using regression and dummy variables      ;
*      REFERENCE CELL CODES                                          ;
proc REG;
        model S = G R GR/SS1 VIF;
*     Traditional analysis of variance    ;
proc ANOVA;
     class G R;
     model S = G|R;
*     Analysis of variance using regression and dummy variables      ;
*      EFFECTS CODES                                                 ;
proc REG;
        model S = G1 R1 GR1/SS1 VIF;