/* Lesson 5-7 */
 /*    File Name = hist02.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;
run;
proc chart data=arudai;
  hbar shintyou kozukai seibetsu jitaku;
run;