不作输出数据的话，貌似tabulate也可以吧，纯粹建议哈

关键就是要输出表啊....
感谢LZ的问题，感谢各位高手的解答~

proc report data=a out=b；
   column id type;
   define id / group;
   define type/ across;
run;

libname e1 '/folders/myfolders/SASEXE/exe1/';
data e1.sasprac1;
infile '/folders/myfolders/SASEXE/exe1/prac1.txt' firstobs=2 missover;
input id $ type $;
run;

ods output CrossTabFreqs=e1.frq;
proc freq data=e1.sasprac1;
table id*type;
run;
ods output close;

data e1.frq;
set e1.frq (keep= id type frequency);
if id ne '' and type ne '';
run;

proc transpose data=e1.frq out=e1.trans (drop= _name_ _label_);
id type;
var frequency;
by id;
run;

楼主看看是否是你希望的效果？我把你的数据保存为prac1.txt，你也可以读取txt，改一下路径即可。