data dailyshow;
input college$ watch$ count;
cards;
yes yes 363
yes no 736
no yes 242
no no 858
;
proc freq data=dailyshow order=data;
tables college*watch / chisq expected;
weight count;
run;

data vote;
input gender$ party$ count;
cards;
F D 762
F I 327
F R 468
M D 484
M I 239
M R 477
;
proc freq data=vote order=data;
tables gender*party / chisq expected;
weight count;
run;

data gof;
input x p @@;
cards;
89 0.4 37 0.15 30 0.15 28 0.19 4 0.11
;
proc freq data=gof order=data;
tables x / chisq expected;
weight p;
run;