/* Lesson 9-4 */
 /*    File Name = anke06.sas   06/19/97   */

options linesize=72 pagesize=24;

data kodukai;
  infile 'kodukai.dat';
  input seibetsu $ jitaku $ kodukai;

proc print data=kodukai(obs=10);
run;
proc freq data=kodukai;
   tables seibetsu jitaku;
run;
proc freq data=kodukai;
   tables seibetsu*jitaku;
run;