如何在sas中将多个列合并为一个列

我有一个时间序列SAS数据集，我想将其传输到垂直数据集

我的数据看起来像

ID A2009 A2010 A2011 A2012
1      1     2     3     4  
2      1     2     3     4   
3      1     2     3     4   
4      1     2     3     4   
5      1     2     3     4    

data multcol;
infile datalines;
input ID A2009 A2010 A2011 A2012 A2013;
return;
datalines;
1 1 2 3 4 5
2 1 2 3 4 5
3 1 2 3 4 5
4 1 2 3 4 5
5 1 2 3 4 5
;
run;

proc print data=multcol noobs;
run;

我在网上搜索只找到某人的解决方案如下。不起作用。 但是我的数据集太大，这个方法关闭了我的计算机

data cmbcol(keep=a orig_varname orig_obsnum);
set multcol;
array myvars _numeric_;
do i = 2 to dim(myvars);
orig_varname = vname(myvars(i));
orig_obsnum = _n_;
A = myvars(i);
output;
end;
run;

proc print data=cmbcol ;
title 'cmbcol';
run;

proc sort data=cmbcol;
by orig_varname a;
run;

proc print data=cmbcol noobs;
title 'cmbcol';
run;

我希望他们变成这样

ID  t  t+1  
1   1   2    
2   1   2    
3   1   2 
4   1   2   
5   1   2  
1   2   3
2   2   3
3   2   3
4   2   3
5   2   3
1   3   4
2   3   4
3   3   4
4   3   4
5   3   4

我们怎么能做到呢

---

提前感谢。

这确实是一种不同寻常的数据结构，但您可以使用以下宏（根据需要进行调整）来实现这一点

options validvarname=any；
%宏观运输；
%设i=2009；
%do%while（&i）这里的想法是帮助人们使用他们的代码而不是实际执行他们的工作。请向我们展示一些代码，以便人们能够帮助你。这是一个非常奇怪的结构。请查看转置以获得你的t列，然后你可以使用一些方法来生成潜在客户（t+1）变量。这里有多个解决方案。如前所述，尝试一些东西，然后有人会帮助编写代码。抱歉。我编辑了这篇文章。感谢提醒。非常感谢你！！！！它很有效！！！我从你的答案中学到了很多，我也学会了如何扩展它。再次感谢你！！很高兴它对你有效。谢谢你的反馈，我也学到了很多来自人们的问题！：）
options validvarname = any;

%macro transp;
  %let i = 2009;
  %do %while (&i <= 2011);
    %let j = %eval(&i + 1);
    data part_&i(rename = (A&i = t A&j = 't+1'n));
      set multcol(keep =  ID A&i A&j);
    run;
    %let i = %eval(&i + 1);
  %end;

  data combined;
    set part_:;
  run;

  proc datasets nolist nodetails;
    delete part_:;
  quit;
%mend transp;

%transp