data aa;
infile datalines missover;
input group1 $ group2 $ group3 $ group4 $ group5 $
group6 $ group7 $ group8 $ group9 $ group10
$ ;
cards;
y y y y y y y y
y y y
y y y y y y
y y y y
y y y y y
y y y y y y y
y y y y y y y y y
y y y y y y y y y y
y y y y y y y y
;
run;
%macro count;
proc sql;
%do i=1 %to 10;
create table b&i as select(put(count(group&i),8. -l)) as group&i from aa;
%end;
quit;
%mend;
%count;
data bb;
merge b1-b10;
run;
data final;
set aa bb;
run;