/* Lesson 6-9 */
 /*    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 class 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 class.;
run;