data cer2b;
  input age gender $ weight;
   agecat=0;
   if age>=10 then agecat=1;
   if age>=20 then agecat=2;
   if age>=30 then agecat=3;
   if age>=40 then agecat=4;
   if age>=50 then agecat=5;
 cards;
 7 f  50
 7 m  65
13 f  75
13 m  92
27 f 115
27 m 130
34 f 120
34 m 175
42 f 115
42 m 186
60 f 112
60 m 145
;;;;
proc print;