options nodate pagesize=54 linesize=80;

/* Read in the input file   */

data ex0512;
* infile '../../../data/biostat/ex0512.dat';
infile 'C:\biostat\data\ex0512.dat';
input siskel ebert;
run;

/* Obtain crosstabs and measure of agreement for Siskel and Ebert */

proc freq;
table siskel*ebert;
exact agree;
run;

quit;