SAS中文论坛

 找回密码
 立即注册

扫一扫,访问微社区

查看: 1452|回复: 2
打印 上一主题 下一主题

遇到难题,请帮忙!

[复制链接]

49

主题

76

帖子

1462

积分

管理员

Rank: 9Rank: 9Rank: 9

积分
1462
楼主
 楼主| 发表于 2012-10-11 14:02:46 | 只看该作者

遇到难题,请帮忙!

已知g1,g2,g3,g4,g5(每个都为500行,2列的随机数),计算g6时从g1-g5中各随机抽取100行,组成g6;同样的方法从g2-g6中组建g7,一直到g100,这个循环弄不了,总是出错,很着急,已经几天了。
回复 支持 反对

使用道具 举报

49

主题

76

帖子

1462

积分

管理员

Rank: 9Rank: 9Rank: 9

积分
1462
沙发
 楼主| 发表于 2012-10-11 18:13:29 | 只看该作者

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]
回复 支持 反对

使用道具 举报

49

主题

76

帖子

1462

积分

管理员

Rank: 9Rank: 9Rank: 9

积分
1462
板凳
 楼主| 发表于 2012-10-11 18:15:37 | 只看该作者

Re: 遇到难题,请帮忙!

你这个问题已经问过了,同时,我已经回复你了。
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|小黑屋|手机版|Archiver|SAS中文论坛  

GMT+8, 2025-5-4 01:20 , Processed in 0.091651 second(s), 20 queries .

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表