[code:6z915gfm]
/*方法一:proc means*/
proc means data=A nway noprint;
class a;
output out=B(drop=_type_ rename=(_freq_=b));
run;
/*方法二:first.a和last.a*/
proc sort data=A out=TEMP;
by a;
run;
data B;
set TEMP;
by a;
retain b;
if first.a then b=0;
b+1;
if last.a;
run;
[/code:6z915gfm]