* ESTIMATING RELATIVE RISKS AND ODDS RATIOS ;

* Change 33, 1667, 27, 2273 to whatever a, b, c, d you have. ;

ODS PDF FILE = 'U:\Lungcancer.pdf';

data Measures;
   input Exposure Response Count;
   datalines;
0 0 33
0 1 1667
1 0 27
1 1 2273
;


* Change the title appropriately. ;

proc freq data=Measures;
   weight count;
   tables exposure*response / relrisk riskdiff;
   title 'Lung Cancer versus Heavy Drinking';
run;

ODS PDF CLOSE;
RUN;