请教如何将年份横排的数据转为竖排（必重谢）

原数据分布如下：
stkcd              EPS(1999)    EPS(2000)    EPS(2001)........EPS(2011)
000001             0.02            0.03               0.04                    0.05
000002             0.01            0.02               0.03                    0.04
........

目标数据：
stkcd                        EPS
00001   1999           0.02
00001   2000           0.03
00001   2001           0.04
....
00001   2011           0.05
00002   1999           0.01
00002   2000           0.02
00002   2001           0.03
....
00002   2011           0.04
.....

请赐教，非常感谢！

data test;
input stkcd $   EPS_1999    EPS_2000    EPS_2001 EPS_2011;
cards;
000001             0.02            0.03               0.04                    0.05
000002             0.01            0.02               0.03                    0.04
;

proc transpose data=test out=wanted;
   by stkcd;
   var eps_1999--eps_2011;
run;

data wanted;
   set wanted;
   year=input(scan(_name_,2,"_"),best.);
   eps=col1;
   drop _name_ col1;
   run;

拷贝，复制的时候选选择性复制，然后选转置，这样就可以了

hhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhh

先把数据拷到excel里，复制－选择性粘贴－倒置－确定，很简单的。

gloryfly 发表于 2012-9-17 20:55
拷贝，复制的时候选选择性复制，然后选转置，这样就可以了

数据少的时候是这样的，如果是超大量的数据就太麻烦了，还是2楼的程序好用，不过也很感谢啊

pobel 发表于 2012-9-17 20:50
data test;
input stkcd $   EPS_1999    EPS_2000    EPS_2001 EPS_2011;
cards;

灰常感谢啊，解决了俺的燃眉之急。没有学过程序的人，脑袋有时候不太灵光，伤不起啊。
能不能再问一个，如果是几个变量呢？譬如EPS_1999    EPS_2000  ... EPS_2011 BPS_1999    BPS_2000  ...BPS_2011
除了分开做，还有木有更简洁的办法捏？