/* Lesson 9-01 */
 /*    File Name = les0901.sas   06/05/08   */
options linesize=72 pagesize=20;

data gakusei;
  infile 'all08ae.prn'
    firstobs=2;
  input sex $ shintyou taijyuu kyoui 
        jitaku $ kodukai carryer $ tsuuwa;

diff180=shintyou-180;
diff170=shintyou-170;
diff169=shintyou-169;
diff168=shintyou-168;
diff1678=shintyou-167.8;

proc print data=gakusei(obs=5);
run;

proc univariate data=gakusei plot;
  var shintyou diff180 diff170 diff169 diff168 diff1678;
run;

/*
proc means data=gakusei;
run;
proc univariate data=gakusei plot;
run;
*/