/* EXAMPLE 6.1.7 */

OPTIONS LS=84;
TITLE 'EXAMPLE 6.1.7';
DATA ROOTS;
  INFILE 'T6_2_ROOT.dat';
  INPUT STOCK GIRTH4 GROWTH GIRTH15 WEIGHT;
PROC GLM;
  CLASS STOCK;
  MODEL GIRTH4 GROWTH GIRTH15 WEIGHT = STOCK;
  MANOVA H=STOCK/PRINTE PRINTH;
RUN;QUIT;