关于转置的问题

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

数据大概是这样滴

ID  r1c1 r1c2 r1c3  r2c1 r2c2 r2c3.....r170c1 r170c2 r170c3
101  25  22  36    95   86    77........      52       53         55

转后：
ID  row  c1   c2   c3
101  1    25   22   36
101  2    95   86   77
...
101 170 52  53  55

请问用transpose能一次搞定吗？？？

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：Transpose Trans pose RAN ans

我现在想到的办法是把数据分成c1、c2、c3三部分，分别转置再拼在一起

不知有没有更好的方法

在excel中，复制——黏贴——选择性黏贴——转置，试试看能不能达到目的。

我能想到的是用两步transpose， 一步搞定我没想到：

data test;
input ID $ r1c1 r1c2 r1c3  r2c1 r2c2 r2c3 r3c1 r3c2 r3c3;
cards;
101  25  22  36  95  86  77  52  53  55 66 77 88
;

proc transpose data=test out=trans1;
by notsorted id;
var r:;
run;

data trans2;
set trans1;
row=substr(_name_,2,index(upcase(_name_),'C')-2);
drop _name_;
run;

proc transpose data=trans2 out=wanted(drop=_name_) prefix=c;
by notsorted id row;
var col1;
run;

data _null_;
    call execute('data wanted; set test;');
        do i=1 to 170;          
           call execute(cats('row=',i,';'));
           call execute(cats('c1=r',i,'c1',';'));
           call execute(cats('c2=r',i,'c2',';'));
           call execute(cats('c3=r',i,'c3',';'));
           call execute('output;');
        end;
        call execute('keep id row c1 c2 c3; run;');
run;

小斜 发表于 2014-7-3 15:48
在excel中，复制——黏贴——选择性黏贴——转置，试试看能不能达到目的。

这个....... excel 就算了

就是为了复用才用sas的

wwang111 发表于 2014-7-3 16:07
我能想到的是用两步transpose， 一步搞定我没想到：

data test;

哥，你真强悍

每次我发疑问，你都能第一时间解决，膜拜

wwang111 发表于 2014-7-3 16:07
我能想到的是用两步transpose， 一步搞定我没想到：

data test;

为什么一般要加上notsorted呢？？

孤灯渡漠 发表于 2014-7-3 17:04
为什么一般要加上notsorted呢？？

也不一定是一般要加，如果数据集过大，加上这个可以节省sort的时间，但是如果数据集里的值不规律，比如id的值不是按顺序下来，会对transpose产生影响的，就得sort了

可以尝试通过二维数组来转置：
data new;
set old(drop=id);
array rc(170,3) _numeric_;
array c(3）c1-c3;
do i=1 to 170;
do j=1 to 3;
c(j)=rc(i,j);
end;
output;
end;
keep c1-c3;
run;