求助：单个数据集读取两次

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

现在有一数据集a其中数据如下：
1
2
3
4
5
有两类1,2，要利用a组织成以下形式：
1 1
1 2
1 3
1 4
1 5
2 1
2 2
2 3
。。。。。

请问循环语句怎么写？


data a;
      do i=1 to 5;
            output;
      end;
run;

data b;
       do x=1 to 2;
            do until(eof);
                  set a end=eof;
                   output;
           end;
       end;
run;

这个程序是错的，只想抛砖引玉一下，想用循环来做。高手请指点！

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：数据集 output outpu until Data 程序

直接新建一个表,表中只有一列,为1,2,3,4.....
之后用这个表和a表进行全连接就行了,就是一个笛卡尔积

data a;
do i=1 to 5;
  do j=1 to 4;
  output;
  end;
output;
end;
run;

Here is a solution using direct access method of data set option point.

data t1;
do i=1 to 5;
   output;
end;
run;

data t2;
   do point1=1,2;
      set t1(rename=(i=i2)) point=point1;
            do point2=1 to nobs;
                   set t1 nobs=nobs point=point2;
                   output;
                end;
        end;
        stop;
run;

proc print;run;

Two different methods are used to handle it.

1. data a;
   
2. input x id;
   
3. cards;
   
4. 1 1
   
5. 2 1
   
6. 3 1
   
7. 4 1
   
8. 5 1
   
9. ;run;
   
10. * choice 1: sql way ;
    
11. proc sql;
    
12. create table b as
    
13. select a1.x as x, a2.x as y
    
14.   from a as a1
    
15.   full join a as a2
    
16.   on a1.id = a2.id
    
17.   order by a1.x, a2.x;
    
18. quit;
    
19. * choice 2: data step way ;
    
20. data b;
    
21. set a(drop = id);
    
22. do ii=1 to n;
    
23.   set a(keep = x rename=(x=y)) nobs=n point=ii;
    
24.   output;
    
25. end;
    
26. run;
    

复制代码