DATA Step, Macro, Functions and more

Nested Do Loop (Only want to accumulate within 1 loop)

Accepted Solution Solved
Reply
New Contributor
Posts: 4
Accepted Solution

Nested Do Loop (Only want to accumulate within 1 loop)

Hi all,

I currently have this program which is supposed to simulate a gambling strategy (educational purposes; this is not a winning strategy by any means).  My program is not quite working because when the 2nd iteration of k begins, the InHand variable continues to accumulate from the final value of when k = 1.  Essentially, I need the InHand to go back to starting at 0 when a new iteration of k begins.  Basically, I just want to repeat everything in the 'i' loop 10,000 times

Does anyone have an idea of a modification I can make to fix this?

data gamble;

do k = 1 to 10000;

do i = 1 to 100000 until (Strategy = "STOP");

Win = RAND('BINOMIAL',0.476,1);

if Win = 1 then Payoff = 5;

else if Win = 0 then Payoff = -5;

InHand + Payoff;

if InHand >= 45 then Strategy = "STOP";

else if InHand <= -50 then Strategy = "STOP";

else Strategy = "CONTINUE";

if InHand = 45 then Result = "WIN ";

else Result = "LOSS";

end;

output;

output;

end;

run;

Thank you in advance!


Accepted Solutions
Solution
‎06-29-2014 11:43 AM
Super Contributor
Posts: 275

Re: Nested Do Loop (Only want to accumulate within 1 loop)

This is what you need?

data gamble;

do k = 1 to 10000;

do i = 1 to 100000 until (Strategy = "STOP");

Win = RAND('BINOMIAL',0.476,1);

if Win = 1 then Payoff = 5;

else if Win = 0 then Payoff = -5;

InHand + Payoff;

if InHand >=45 or inHand<=-50 then Strategy = "STOP";

else Strategy = "CONTINUE";

if InHand = 45 then Result = "WIN ";

else Result = "LOSS";

end;

output;

call missing(Inhand);

end;

run;

View solution in original post


All Replies
Solution
‎06-29-2014 11:43 AM
Super Contributor
Posts: 275

Re: Nested Do Loop (Only want to accumulate within 1 loop)

This is what you need?

data gamble;

do k = 1 to 10000;

do i = 1 to 100000 until (Strategy = "STOP");

Win = RAND('BINOMIAL',0.476,1);

if Win = 1 then Payoff = 5;

else if Win = 0 then Payoff = -5;

InHand + Payoff;

if InHand >=45 or inHand<=-50 then Strategy = "STOP";

else Strategy = "CONTINUE";

if InHand = 45 then Result = "WIN ";

else Result = "LOSS";

end;

output;

call missing(Inhand);

end;

run;

New Contributor
Posts: 4

Re: Nested Do Loop (Only want to accumulate within 1 loop)

Thanks a lot to both of you for your help.  Both solutions worked perfectly.

Respected Advisor
Posts: 4,659

Re: Nested Do Loop (Only want to accumulate within 1 loop)

All you need is the statement InHand = 0; after do k = 1 to 10000;

I also suggest calling STREAMINIT as the first statement of the datastep to get reproducible results. 

Why two output statements?

You may also consider replacing the BINOMIAL distribution with the BERNOULLI.

PG

PG
☑ This topic is solved.

Need further help from the community? Please ask a new question.

Discussion stats
  • 3 replies
  • 275 views
  • 6 likes
  • 3 in conversation