SAS中文论坛

标题: 遇到难题，请帮忙！ [打印本页]

作者: shiyiming 时间: 2012-10-11 14:02
标题: 遇到难题，请帮忙！
已知g1,g2,g3,g4,g5（每个都为500行，2列的随机数），计算g6时从g1-g5中各随机抽取100行，组成g6;同样的方法从g2-g6中组建g7,一直到g100，这个循环弄不了，总是出错，很着急，已经几天了。

作者: shiyiming 时间: 2012-10-11 18:13
标题: Re: 遇到难题，请帮忙！
[code:yhgtf0to]
options mlogic mprint symbolgen;

data g;
do i=1 to 2500;
x=ranuni(0);
y=ranuni(123456);
output;
end;
drop i;
run;

data g1 g2 g3 g4 g5;
set g;
if _n_<=100 then output g1;
else if 100<_n_<=200 then output g2;
else if 200<_n_<=300 then output g3;
else if 300<_n_<=400 then output g4;
else if 400<_n_<=500 then output g5;
run;

%macro sam(inds,outds);
proc surveyselect data=&inds
  method=srs
  rep=1
  sampsize=100
  seed=12345
  out=&outds;
  id _all_;
run;
%mend;

%macro ds;
%do j=6 %to 100;
%sam(g%eval(&j-1),t1)
%sam(g%eval(&j-2),t2)
%sam(g%eval(&j-3),t3)
%sam(g%eval(&j-4),t4)
%sam(g%eval(&j-5),t5)
data g&j;
set t1 t2 t3 t4 t5;
run;
%end;
%mend;
%ds
[/code:yhgtf0to]

作者: shiyiming 时间: 2012-10-11 18:15
标题: Re: 遇到难题，请帮忙！
你这个问题已经问过了，同时，我已经回复你了。

欢迎光临 SAS中文论坛 (http://www.mysas.net/forum/)