yydy1021.sas

高老师的经典多元统计分析教材源代码非常经典使用

/*  YYDY1021.sas  */


data d1021;
   input x1 x2 y1 y2;
   n=_n_;
   cards;
0.14    0.30    0.03    0.14
0.20    0.50    0.14    0.22
0.06    0.11    0.03    0.02
0.07    0.11    0.04    0.13
0.12    0.22    0.06    0.12
0.52    0.87    0.19    0.20
0.23    0.47    0.14    0.10
1.19    0.38    0.09    0.11
0.37    0.66    0.14    0.15
0.36    0.60    0.12    0.14
0.42    0.77    0.17    0.10
0.35    0.85    0.30    0.19
0.50    0.87    0.23    0.22
0.56    1.15    0.29    0.28
0.43    0.90    0.13    0.22
0.47    0.97    0.26    0.22
0.49    0.79    0.21    0.20
0.47    0.77    0.51    0.22
0.40    0.88    0.33    0.19
0.66    1.30    0.21    0.30
0.63    1.30    0.45    0.28
0.52    1.43    0.31    0.23
0.44    0.87    0.17    0.25
0.03    0.07    0.05    0.08
0.20    0.28    0.04    0.08
0.04    0.10    0.11    0.07
0.17    0.28    0.15    0.09
;
proc print ;
run;

proc cancorr data=d1021 simple  corr vprefix=v
             wprefix=w out=o1021 ;
  var x1 x2;
  with y1 y2;
run;

proc print data=o1021;
   var v1 w1 x1 x2 y1 y2;
run;
proc plot data=o1021;
   plot w1*v1 $ n='*' / vref=0 href=0;
run;
quit;