%macro mylogita(indata, all_deps, indvars =,);
%let k=1;
%let dep = %scan(&all_deps, &k);
%do %while(&dep NE);
title "The dependent variable is &dep";
title2 "The independent variables are &indvars";
ods output ParameterEstimates = prob&k. oddsratioswald=odds&k.;;
proc logistic data=&indata des;
model &dep = &indvars;
run;
%let k = %eval(&k + 1);
%let dep = %scan(&all_deps, &k);
%end;
%mend;
data &myout._odds;
set
%do i = 1 %to &k - 1;
odds&i (in=in&i.)
%end;
;
%do i = 1 %to &k - 1;
if in&i. then run=&i.;
%end;
run;
data &myout._prob;
set
%do i = 1 %to &k - 1;
prob&i (in=in&i.)
%end;
;
%do i = 1 %to &k - 1;
if in&i. then run=&i.;
%end;
run;
*run the program;
%mylogita(xxx, v1 v2 v3, indvars = ind1 ind2);
title "These are the outputs";
proc print data = &myout._odds;
run;
proc print data =&myout2_prob;
run;
... View more
