data data4;
infile 'd:\data4.txt';
input id $1.
name : $
height
weight
gender $;
if _n_=1 then delete;
proc print;
proc means sum;
class gender;
var height;;
proc means sum;
var weight;
run;
data data4;
infile 'e:\data4.txt';
input id $ name $
height
weight
gender $;
if _n_=1 then delete;
run;
proc tabulate data=data4;
class gender;
var height weight;
table gender="" all="合计",N="人数"*f=10. height="height合计"*sum=""*f=10. weight="weight合计"*sum=""*f=10.;
run;