topic Re: how can i recode using array in SAS Programming

how can i recode using array

rs84 — Thu, 24 Nov 2016 16:54:00 GMT

Trying to recode the following into more condensed code

sickday1=S30Q4_30d_1+S30Q5_30d_1+S30Q6_30d_1+S30Q7_30d_1; sickday2=S30Q4_30d_2+S30Q5_30d_2+S30Q6_30d_2+S30Q7_30d_2; sickday3=S30Q4_30d_3+S30Q5_30d_3+S30Q6_30d_3+S30Q7_30d_3;

this format continues until sickday30.

I was able to do so the following with the following in a data statement:

%macro sick (i); sicksday&i. = S30Q4_30d_&i.+S30Q5_30d_&i.+S30Q6_30d_&i.+S30Q7_30d_&i.; %mend; %array(num, values = %numlist(1-30)); %do_over(num, macro=sick);

or with the following code

array sickday {30}; array S30Q4_30d{} S30Q4_30d_1 -- S30Q4_30d_30; array S30Q5_30d{} S30Q5_30d_1--S30Q5_30d_30; array S30Q6_30d{} S30Q6_30d_1--S30Q6_30d_30; array S30Q7_30d{} S30Q7_30d_1--S30Q7_30d_30; do i = 1 to 30; drinksday{i} = S30Q4_30d[i]+S30Q5_30d[i]+S30Q6_30d[i]+S30Q7_30d[i]; end;

However my problem arises in that I actually need sickday1- sickday60, but the variables sickday31 to sickday60 are coded as follows: sickday31=S30Q4_60d_1+S30Q5_60d_1+S30Q6_60d_1+S30Q7_60d_1; sickday32=S30Q4_60d_2+S30Q5_60d_2+S30Q6_60d_2+S30Q7_60d_2; etc. where the numbering of the newly created variable no longer matches the endings of the variables used to calculate it. I also think my code to create the first 30 variables could be somewhat improved. I've tried a few ways to do this but nothing is working properly.

Re: how can i recode using array

rs84 — Thu, 24 Nov 2016 17:36:10 GMT

I got it to work using the following code but would really like if someone can help with something simpler, perhaps only using arrays without using the %do_over and %array macros.

%macro sick (i);
sick day&i. = S30Q4_30d_&i.+S30Q5_30d_&i.+S30Q6_30d_&i.+S30Q7_30d_&i.;
%mend;
%array(num, values = %numlist(1-30));
%do_over(num, macro= sick);
%macro sick 2 (j, k);
sickday&j. = S30Q4_60d_&k.+S30Q5_60d_&k.+S30Q6_60d_&k.+S30Q7_60d_&k.;
%mend;
%array(num2, values = %numlist(31-60));
%array(num3, values = %numlist(1-30));
%do_over(num2 num3, macro= sick2);

Re: how can i recode using array

Reeza — Thu, 24 Nov 2016 20:42:13 GMT

To be honest, not being able to read your code isn't helping your question at all.

Rather than dealing with all 30 vars and how many every summaries, can you simplify your problem to maybe 5 and the corresponding sums?Adding some sample data to test with would be helpful as well.

I'm 99% certain you can do this with arrays.

Re: how can i recode using array

mkeintz — Fri, 25 Nov 2016 03:35:01 GMT

How about a technique of listing all the vars in one long array, then looping through the array by appropriate step sizes?

Consider;

array sq {*} s30q4_30d_1-s30q4_30d_30 s30q4_60d_1-S30q4_60d_30

s30q5_30d_1-s30q5_30d_30 s30q5_60d_1-S30q5_60d_30

s30q6_30d_1-s30q6_30d_30 s30q6_60d_1-S30q6_60d_30

s30q7_30d_1-s30q7_30d_30 s30q7_60d_1-S30q7_60d_30; /* 4 lists of 60 vars each */

/* Now get 60 sums */

array sickdays {60} (60*0);

do S=1 to 60;

do J=S to dim(sq) by 60;

sickdays{s}=sickdays{s}+sq{j};

end;

You could also make array SQ into a 2-dimensional array {60*4} then sum each column over its 4 rows, then all loops would increment by 1 as in:

do s=1 to 60;

do r=1 to 4; sickdays{s}=sickdays{s}+sq{s,r}; end;

end;

Compact code. No macro needed.

Regards,

Mark

Re: how can i recode using array

Reeza — Fri, 25 Nov 2016 01:28:22 GMT

@mkeintz small typo in the variable names - second and fourth set starts with 30 rather than S30?

Re: how can i recode using array

mkeintz — Fri, 25 Nov 2016 03:36:20 GMT

@Reeza

thank you. now corrected.

Re: how can i recode using array

rs84 — Mon, 28 Nov 2016 16:25:58 GMT

Thank you, was very helpful. I was stuck thinking about the problem in a certain way and your solution is simple but just what I needed.