data a;
input id  x;
cards;
1  6
1  0  
1  1
1  2
1  4
1  2
1  3
1  2
1  .
2  3
2  0  
2  1
......
;
run;
proc sort data=a;
by p_id;
run;
proc transpose data=a out=b prefix=fol;
var x;
by id;
run;
data c(keep=id fol2 fol4 fol6);
set b;
run;
由以上程序产生的变量fol2 fol4 fol6如何转变成var1 var2 var3?谢谢各位大侠指教（......表示数据量很大）。