options ls=68 nodate;
data class;
   input name $ sex $ age height weight;
cards;
Pancho    M 12 59.0  99.5
Daniel    M 12 57.3  83.0
PatyIbar  F 14 69.0 112.5
Cecilia   F 15 66.5 112.0
Enrique   M 13 62.5  84.0
Irigoyen  M 15 67.0 133.0
LidiaDaz  F 11 57.5  85.0
LuzIrene  F 16 72.0 150.0
Molina    M 12 64.8 128.0
Nelson    M 14 63.5 102.5
Zeta-J    F 15 62.5 112.5
Fido      M 11 51.3  50.5
Poncho    M 14 64.3  90.0
Cage      M 14 62.8 102.5
Travolta  M 12 59.8  84.5
Verónica  F 12 56.3  77.0
Tiffany   F 13 65.3  98.0
Jennifer  F 15 66.5 112.0
MiraSorvi F 13 56.5  84.0

proc print;
proc means;
   variables height weight;
data males;
   set class;
   if sex='M';
proc print;
proc plot data=males;
   plot weight*height=sex;
run;