* plasma.sas, plasma experiment, Table 11.19 output (page 376);
options ls=72;
;
DATA PLASMA;
  INPUT BLOCK TRTMT Y;
  LINES;
  1 4 0.459
  1 5 0.458
  1 1 0.482
  2 5 0.465
  2 6 0.467
  2 2 0.464
  3 6 0.472
  3 1 0.495
  3 3 0.473
  4 1 0.325
  4 2 0.296
  4 4 0.283
  5 2 0.390
  5 3 0.248
  5 5 0.410
  6 3 0.239
  6 4 0.350
  6 6 0.384
;
PROC GLM;
  CLASS BLOCK TRTMT;
  MODEL Y = BLOCK TRTMT;
;
DATA DAY1; SET PLASMA;
  IF BLOCK<4;
;
PROC GLM; 
  CLASS BLOCK TRTMT; 
  MODEL Y = BLOCK TRTMT;
  LSMEANS TRTMT / PDIFF=ALL CL ADJUST=TUKEY;