DM 'CLEAR LOG';
DM 'CLEAR OUTPUT';
OPTIONS LINESIZE=72 NODATE NONUMBER;
LIBNAME LIBRARY 'a:\';
PROC FREQ  DATA=LIBRARY.pulse;
     TABLE smoker * activity/CHISQ EXPECTED CELLCHI2;
RUN;