/* Lesson 4-2 */                                      
 /*    File Name = les0402.sas   10/30/03   */         
options linesize=72 pagesize=20;
                                                       
data naikaku;                                          
  infile 'naikaku01.prn'
    firstobs=2;
  input name $15. sex $ goukei tochi
        yotyokin kasituke kariire;

proc print data=naikaku(obs=5);
run;
proc means data=naikaku;
run;

proc chart data=naikaku;
  hbar goukei;
  vbar goukei;
run;

proc chart data=naikaku;
  hbar goukei / midpoints= 10000 to 80000 by 10000;
  vbar goukei / midpoints= 20000 to 80000 by 20000;
run;