topic Re: do within do loop in SAS Programming

do within do loop

div44 — Tue, 25 Oct 2016 01:09:55 GMT

data test888;
set test88;
array gap(*) gap1-gap370;
do r=1 to 370;
do y=1 to 370;
if ((gap(y) - gap(r)) >= 90) then leave;
end;
end;
run;

I cannot get the code to work.

I want to find the combination of gap(R) and gap(y) which have a difference of more than 89.

Re: do within do loop

ChrisNZ — Tue, 25 Oct 2016 02:34:22 GMT

Like this?

data HAVE;
  array GAP(*) GAP1-GAP370;
  do I=1 to 370;
    GAP[I]=ranuni(0)*100;
  end;
run;

data WANT;
  keep I J VAL_I VAL_J;
  set HAVE;
  array GAP(*) GAP1-GAP370;
  do I=1 to 369;
    do J=I+1 to 370;
      if abs(GAP[I]-GAP[J]) >= 90 then do;
        VAL_I=GAP[I];
        VAL_J=GAP[J];
        output;
      end;
    end;
  end;
run;

Re: do within do loop

Astounding — Tue, 25 Oct 2016 05:10:19 GMT

Chris has the right idea, changing the limits on your loops. The program will run faster if you don't check the combinations that you don't need to check.

Your original program is probably encountering this issue. (I can't test it right now.) The LEAVE statement only applies to a single loop. So it gets you out of the interior loop, without getting you out of the exterior loop. Just take that entire statement and repeat it after the first END statement.

Re: do within do loop

div44 — Tue, 25 Oct 2016 15:46:37 GMT

Thank you so much for your help !!

Re: do within do loop

div44 — Tue, 25 Oct 2016 15:47:23 GMT

Thank you so much for your help