SAS同时把多个变量转置以后还在一个观测

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

a	b	c	d	e
01003	2020-12-08	C1	2	否
01003	2021-01-08	C2	3	是
02010	2020-09-14	C1	2	否
02010	2020-10-10	C2	3	是
02014	2020-09-24	C1	2	否
02014	2020-10-19	C2	3	是
02014	2020-12-22	C5	6	是

怎么可以把数据按照d列进行转置，转置以后b,c列还是跟在d列的后面，变成下面的样子

a	d1	b	c	d2	b	c	d3	b	c
01003	2	2020-12-08	治疗期C1	3	2021-01-08	治疗期C2
02010	2	2020-09-14	治疗期C1	3	2020-10-10	治疗期C2
02014	2	2020-09-24	治疗期C1	3	2020-10-19	治疗期C2	6	2020-12-22	治疗期C5

扫码加我 拉你入群

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

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

分享0 收藏2 回帖

关键词：多个变量

有没有知道的帮忙解决一下啊

如图，供参考。

1. data test1;
   
2.         input (a        b        c        d        e) (:$100.);
   
3. cards;
   
4. 01003        2020-12-08        C1        2 否
   
5. 01003        2021-01-08        C2        3 是
   
6. 02010        2020-09-14        C1        2 否
   
7. 02010        2020-10-10        C2        3 是
   
8. 02014        2020-09-24        C1        2 否
   
9. 02014        2020-10-19        C2        3 是
   
10. 02014        2020-12-22        C5        6 是
    
11. ;
    
12. run;
    
13. 
    
14. proc sql noprint;
    
15.         select distinct(d) into : d separated by ' ' from test1;
    
16. quit;
    
17. 
    
18. proc sort data=test1;
    
19.         by a d;
    
20. run;
    
21. 
    
22. %macro tran;
    
23. data want;
    
24.         set test1(drop=e);
    
25.         by a d;
    
26.         length
    
27. %do i=1 %to %sysfunc(countw(&d));
    
28. %let dd=%scan(&d,&i);
    
29. d_&dd $100
    
30. b_&dd $100
    
31. c_&dd $100
    
32. %end;
    
33. ;
    
34.         retain
    
35. %do i=1 %to %sysfunc(countw(&d));
    
36. %let dd=%scan(&d,&i);
    
37. d_&dd b_&dd c_&dd
    
38. %end;
    
39. ;
    
40. %do i=1 %to %sysfunc(countw(&d));
    
41. %let dd=%scan(&d,&i);
    
42.         if d="&dd" then do;
    
43.                 d_&dd=d;
    
44.                 b_&dd=b;
    
45.                 c_&dd=c;
    
46.         end;
    
47. %end;
    
48.         if last.a then output;
    
49.         drop b c d;
    
50. run;
    
51. %mend;
    
52. %tran;
    
53. 
    
54. proc print;run;

复制代码

l1i2n3i4n5g 发表于 2021-1-25 15:11

牛 比 牛逼，学习了。

zdl1225 发表于 2021-1-25 13:05
如图，供参考。

这是对每个变量分别转置，再进行merge合并吗，很棒哦

l1i2n3i4n5g 发表于 2021-1-25 15:11

膜拜大神，太牛逼了，对我这小白还有好多看不懂

l1i2n3i4n5g 发表于 2021-1-25 15:11

有点复杂，其实可以更简单点