| Features: |
PRINTTO statement without options
|
data test;
do n=1 to 1000;
x=int(ranuni(77777)*7);
y=int(ranuni(77777)*5);
output;
end;
run;
filename routed 'output-filename';
ods listing; proc printto print=routed new; run;
proc freq data=test;
tables x*y / chisq;
run;
proc printto print=print; run;
data probtest;
infile routed;
input word1 $ @;
if word1='Chi-Squa' then
do;
input df chisq prob;
keep chisq prob;
output;
end;
run;
proc print data=probtest;
title 'Chi-Square Analysis for Table of X by Y';
run; data probtest;
infile routed;
input word1 $ @;
if word1='Chi-Squa' then
do;
input df chisq prob;
keep chisq prob;
output;
end;
run;