*
chapter_5_table_4

The following data consists of blood pressure measurements for six 
individuals randomly assigned to one of four groups. Our purpose 
here is to perform four planed contrasts in order to discern if 
group differences exist for the chosen contrasts of interests. 

At the time of this writing, SAS does not seem to be able to compute 
the appropriate critical values for the Bonferroni procedure given 
the contrasts specified, nor is it able to perform contrasts when 
homogeneity of variance is not assumed. As is stated on page 207 
of the text, "the best one can do . . . is to obtain intermediate 
values that can then be used as input to appropriate formulas" for
hand calculations.
;


LIBNAME md 'd:\data files by type\sas data files\tables';
     Data c5t4;
       SET md.chapter_5_table_4;
PROC GLM DATA=c5t4;
CLASS group;
MODEL sbp = group;
CONTRAST 'Assuming Equal Variances: Group 1 vs. 2'
group 1 -1 0 0;
CONTRAST 'Assuming Equal Variances: Group 1 vs. 3'
group 1 0 -1 0;
CONTRAST 'Assuming Equal Variances: Group 2 vs. 3'
group 0 1 -1 0;
CONTRAST 'Assuming Equal Variances: Mean of Group 1, 2, and 3 vs. 4 '
group 1 1 1 -3;
RUN;