/* x2_1.sas */
/* Purpose:  */

title1 'Example 2.1 (note: analysis on type=cov data)';

data a (type=cov);
  length _type_ $ 8 _name_ $ 8;
  input _type_ _name_ x y z;
cards;
COV X 1 2 2
COV Y 2 5 3
COV Z 2 3 5
;

proc print;
title2 'List of data.';

proc princomp data=a cov;
title2 'Compute eigenvalues and eigenvectors.';

run;