/* x6_2.sas */
/* Purpose:  */

title1 'Example 6.2.';

data a;
  input si al;
  cards;
19.4  5.9
21.5  4.0
19.2  4.0
18.4  5.4
20.6  6.2
19.8  5.7
18.7  6.0
;

proc print data=a;
title2 'List of data.';

proc princomp cov data=a;
  var si al;
title2 'Eigenvalues and -vectors for S matrix (Use relationship between S & S**-1).';

run;