- data a ;
- input Id$ x1-x8;
- cards;
- A 12 9 13 15 0.12 -0.3 0.01 0.09
- B -3 12 26 19 0.13 0.5 0.07 0.2
- C -15 -12 20 -0.26 0.7 0.05 -3 0.1
- ;
- run;
- proc standard data=a out=z mean=0 std=1;
- var x1-x8;
- run;
- proc standard data=a out=t mean=50 std=10;
- var x1-x8;
- run;
- /*另外一种方法生成T分数*/
- data tt;
- set z ;
- array x(8) x1-x8;
- array t(8) t1-t8;
- do i=1 to 8;
- t(i)=x(i)*10+50;
- end;
- keep id t1-t8;
- run;