topic Re: Macro that returns code - help requested in SAS Programming

Macro that returns code - help requested

spirto — Thu, 13 Nov 2014 19:20:41 GMT

Hello all, I am trying to macro-tize a portion of my code (in red) that involves the eta variable.

%let &Nsites=5;

data PHData;

array SiteDummy{&Nsites} (&Nsites*0);

array SiteRate{&Nsites} (&Nsites*0);

eta=log(med/3)*StomaType +

log(med/SiteRate{2})*SiteDummy{2} +

log(med/SiteRate{3})*SiteDummy{3} +

log(med/SiteRate{4})*SiteDummy{4} +

log(med/SiteRate{5})*SiteDummy{5} +

log(med/7)*barrier;

run;

Given the number of sites, that portion of code should be dynamic.

For example if &Nsites=1 then it should be "log(med/SiteRate{2})*SiteDummy{2} +"

if &Nsites=2 then it should be "log(med/SiteRate{2})*SiteDummy{2} +

log(med/SiteRate{3})*SiteDummy{3} +"

Can a macro be written so it can be used in the following way:

%let &Nsites=5;

data PHData;

array SiteDummy{&Nsites} (&Nsites*0);

array SiteRate{&Nsites} (&Nsites*0);

eta=log(med/3)*StomaType +

%SiteLinPred(Nsites=&Nsites)

log(med/7)*barrier;

run;

Thank you

Re: Macro that returns code - help requested

Reeza — Thu, 13 Nov 2014 20:16:57 GMT

Why a macro? You can use an array loop

eta_temp=0;

do i=1 to &nsites;

eta_temp=log(med/siterate(i)*siteDummy(i))+eta_temp;

end;

eta=log(med/3)*StomaType +

eta_temp+

log(med/7)*barrier;

Re: Macro that returns code - help requested

spirto — Thu, 13 Nov 2014 20:40:08 GMT

Reeze I never thought about using an array loop! Thanks. I actually figured out how to do it using a macro as well for completeness sake.

Thanks again

%macro SiteLinPred(Nsites=);

%do i=2 %to &Nsites-1;

log(med/SiteRate{&i})*SiteDummy{&i} +

%end;

log(med/SiteRate{&Nsites})*SiteDummy{&Nsites}

%mend SiteLinPred;

%let &Nsites=5;

data PHData;

array SiteDummy{&Nsites} (&Nsites*0);

array SiteRate{&Nsites} (&Nsites*0);

eta=log(med/3)*StomaType +

%SiteLinPred(Nsites=&Nsites) +

log(med/7)*barrier;

run;