如何用retain\lag函数将多列变量转为一列？

求教一下，如题，已有数据集中有变量C1-C10，C1为1-10，C2为11-20，以此类推，如何产生数据集CC，使得最终数据集是1-100的一列数据。

1. data test;
   
2.         array c[10];
   
3.         do j=1 to 10;
   
4.                 do i=1 to dim(c);
   
5.                         c[i]=j+10*(i-1);
   
6.                 end;
   
7.                 output;
   
8.         end;
   
9.         drop i j;
   
10. run;
    
11. 
    
12. /*方法一*/
    
13. proc transpose data=test out=testa1;
    
14. run;
    
15. 
    
16. proc transpose data=testa1 out=testa2;
    
17.         by _name_ notsorted;
    
18. run;
    
19. 
    
20. /*方法二*/
    
21. data testb1;
    
22.         set test;
    
23.         array c[10];
    
24.         do i=1 to dim(c);
    
25.                 cc=c[i];
    
26.                 output;
    
27.         end;
    
28.         keep cc;
    
29. run;
    
30. proc sort data=testb1;
    
31.         by cc;
    
32. run;

复制代码

l1i2n3i4n5g 发表于 2017-7-25 09:23

非常感谢，这两种方法实现起来稍微简单些，但是如何使用retain/lag语句来实现呢？作业需要这样实现，谢谢了！

1. proc iml;
   
2.         use test;
   
3.            read all var _ALL_;
   
4.         close test;
   
5.         new=c1//c2//c3//c4//c5//c6//c7//c8//c9//c10;
   
6.         create a2 var {new};
   
7.                 append;
   
8.         close a2;
   
9. quit;

复制代码

极其粗暴 ……但是一看就懂