/* SAS Example 2a: Factor Analysis on HATCO data                     */

OPTIONS PS=52;
OPTIONS LS=78;
OPTIONS NODATE;
OPTIONS PAGENO=1;

DATA PERCEPTION;
   INFILE 'A:/HATCO_SET.PRN';
   INPUT X1-X14;
   LABEL X1 = 'Delivery Speed';
   LABEL X2 = 'Price Level';
   LABEL X3 = 'Price Flexibility';
   LABEL X4 = 'Manufacturer Image';
   LABEL X5 = 'Service';
   LABEL X6 = 'Salesforce Image';
   LABEL X7 = 'Product Quality';
   LABEL X8 = 'Firm Size';
   LABEL X9 = 'Usage Level';
   LABEL X10 = 'Satisfaction Level';
   LABEL X11 = 'Specification Buying';
   LABEL X12 = 'Structure of Procurement';
   LABEL X13 = 'Type of Industry';
   LABEL X14 = 'Type of Buying Situation';
RUN;

/* We will first print out the data									 */

PROC PRINT DATA=PERCEPTION;
   TITLE 'HATCO Perception Data';
RUN;

/* Initially we will consider all the perception variables           */
 
PROC CORR;
   TITLE 'Correlations of all seven HATCO Perception Variables';
   VAR X1-X7;
RUN;

PROC FACTOR CORR MSA SCREE ROTATE = VARIMAX;
   TITLE 'Factor Analysis on all seven HATCO Perception Variables';
   VAR X1-X7;
RUN;

/* Once we have decided to exclude X5 from the Factor Analysis (which
   would have been done seperately of course, not in the same program)
   we will now just consider X1-X4, X6 and X7						 */
 
PROC CORR;
   TITLE 'Correlations on remaining six HATCO Perception Variables';
   VAR X1-X4 X6 X7;
RUN;

PROC FACTOR CORR MSA SCREE ROTATE = VARIMAX;
   TITLE 'Factor Analysis on remaining six HATCO Perception Variables';
   VAR X1-X4 X6 X7;
RUN;

/* Now trying an oblique PROMAX rotation to compare results			 */

PROC FACTOR CORR MSA SCREE ROTATE = PROMAX;
   TITLE 'Factor Analysis on HATCO Perception Data with Oblique Rotation';
   VAR X1-X4 X6 X7;
RUN;