/* Data labeling and formatting */ 
title 'Sandflies';

data sandflies;
    input sex $ height n;
 label sex = Sex of Sandfly;
 label height = 'Height of light trap';
cards;
m 3  173
m 35 125
f 3  150
f 35  73
;
 
run;

proc format; 
   value $SEX 'm' = 'Male' 'f' = 'Female';
   value Height 3 = '3 Feet' 
                35 = '35 Feet';
run;

proc freq data=sandflies;
  tables sex*height;
  weight n;
  format sex $SEX. height Height.;
run;

proc tabulate data = sandflies order = data; 
  class sex height;
  var n;
  tables sex*height, n;
  format sex $SEX. height Height.;
run;