/* Lesson 6-2 */
 /*    File Name = scat02.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 means data=zenin;
run;
proc plot data=zenin;
   plot shintyou*taijyuu;
run;