data cor1;
input x1-x4;
cards;
40 2.0 5 20
10 1.5 5 30
120 3.0 13 50
250 4.5 18 0
120 3.5 9 50
10 1.5 12 50
40 1.0 19 40
270 4.0 13 60
280 3.5 11 60
170 3.0 9 60
180 3.5 14 40
220 1.5 17 20
130 2.0 30 50
160 1.5 35 60
220 2.5 14 30
140 2.0 20 20
220 2.0 14 10
40 1.0 10 0
20 1.0 12 60
120 2.0 20 0
;
proc print; /*输出主成分分析的数据集*/
run;
proc princomp data=cor1 /*待分析数据集*/
out=corout /*主成分分析的结果*/
outstat=corstat /*输出每个指标的均值、标准差等等*/
prefix=z; /*指定主成分名称前缀为z*/
var x1-x4;
run;
proc print data=corout;
run;
proc print data=corstat; /*输出每个变量的特征值、相关系数矩阵、得分情况*/
run;
主成分分析之多元回归:
data cor2;
input x1 x2 x3 y;
cards;
51.3 73.6 36.4 2.99
48.9 83.9 34.0 3.11
42.8 78.3 31.0 1.91
55.0 77.1 31.0 2.63
45.3 81.7 30.0 2.86
45.3 74.8 32.0 1.91
51.4 73.7 36.5 2.98
5


1445

被折叠的 条评论
为什么被折叠?



