/* Lesson 7-3 */
 /*    File Name = freq03.sas   11/15/96   */

data zenin;
  infile 'all.dat';
  input seibetsu $ shintyou taijyuu kyoui kozukai jitaku $ daigaku $;

proc print data=zenin(obs=10);
run;

proc format;
  value clshin low-<150='   -149'
               150-<160='150-159'
               160-<170='160-169'
               170-high='170-   '
               other   ='missing';
run;
proc tabulate data=zenin;
  class shintyou seibetsu;
  var taijyuu;
  tables taijyuu*(n mean std),shintyou*seibetsu;
  format shintyou clshin.;
run;