/* Lesson 5-2 */
 /*    File Name = seibe02.sas   11/08/96   */

data arudai;
  infile 'some.dat';
  input seibetsu $ shintyou taijyuu kyoui kozukai jitaku $ daigaku $;

proc print data=arudai(obs=10);
run;
proc means data=arudai;
   var shintyou;
run;
proc sort data=arudai;
   by seibetsu;
run;
proc means data=arudai;
   var shintyou;
   by seibetsu;
run;