/*

2 x 2 tables from 5 case-control studies

Source: G. Thériault 

*/

DATA a;
 INPUT study exposure cases controls total ;
 
/* 
Study      1 to 5
exposure   1:  < 100 m; 0: > 100 m
cases      number of cases
controls   number of controls
total      cases plus controls
*/

LINES;
1 1  18   25   43      
1 0 162  252  414      
2 1  12  123  135
2 0  26  431  457
3 1  27  104  131
3 0 121  475  596
4 1   7    3   10
4 0  21   25   46
5 1  14    7   21
5 0 353  359  712
;
DATA sasuser.theriau (KEEP = study exposure event Number) ;
SET a;
  event = 1; Number = cases;    OUTPUT; 
  event = 0; Number = controls; OUTPUT;
RUN;