## More Sampling

Solved
Frequent Contributor
Posts: 126

# More Sampling

I have the following code applied to the attached file which I need to modify such that I draw sample of N loans from the loan population labelled 'PUR' until the sum of the UPBs reaches 50000.

Any thoughts are welcome.

proc means data=LoanPopulation n;

var Loan_ID;

output=want;

run;

proc surveyselect data=loan_population3

method=srs n=(.8*n) out=PUR_sample;

where purpcd='PUR';

run;

Accepted Solutions
Solution
‎07-16-2014 04:31 PM
Posts: 1,270

## Re: More Sampling

You can try somthing like this

data want;

set have (where=(PURPOSE='PUR'));

call streaminit(12);

if rand("Uniform")<=0.8 then total+upb;

if total>50000 then stop;

run;

All Replies
Solution
‎07-16-2014 04:31 PM
Posts: 1,270

## Re: More Sampling

You can try somthing like this

data want;

set have (where=(PURPOSE='PUR'));

call streaminit(12);

if rand("Uniform")<=0.8 then total+upb;

if total>50000 then stop;

run;

🔒 This topic is solved and locked.