/*改进版代码*/
/*以var4 var5为分组变量,每个组内,ID变量唯一*/
proc transpose data=d out=d1 name=Test ;
by var4 var5;
id var6;
run;
proc sql;
create table d3(keep=_501 _502 _503 _504 _505 _506 _507 _508 ) as
select * from d1 where _501=5 or _501=20;
quit;
data demo15;
merge test7 d3;
run;