DATA   d1  (TYPE=CORR);      
  _TYPE_='CORR';        
  INFILE `LSW.txt' MISSOVER;
  INPUT Fac Pic        Faci Sens Cha Ble Eml Emg;     
RUN;
PROC FACTOR DATA=D1 METHOD=P PRIORS=SMC ROTATE=PROMAX SCREE CORR RES;
RUN;


文本文件LSW的内容如下：
1.00                                                        
1.00         1.00                                                
0.97         0.97         1.00                                        
0.98         0.98         1.00         1.00                                
0.11         0.12         0.62         0.37         1.00                        
0.10         0.12         0.61         0.37         0.99         1.00                
0.51         0.51         0.80         0.69         0.89         0.91         1.00        
0.39         0.39         0.66         0.69         0.93         0.94         1.00         1.00