请问如何按照BY组把其中某几个变量由列同时变成一行？谢谢！

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

请教各位老师如下问题，谢谢！
如何从数据集aa生成数据集b?
说明如下，
cardid & symp为字符变量，
其余为数字或日期变量，
按照cardid & flwdate排序后，
每一个cardid可能有不只一个flwdate、cd4及symp，
如何把by组的cardid后面的其他几个变量由多列列变成一行？
数据集见附件。

1. data aa;
   
2. input cardid;
   
3. 
   
4. cards;
   
5. -149042        346        2009/12/16        2010/1/28        1
   
6. -149042        307        2010/7/13        2010/7/28        1
   
7. -149042        307        2010/7/13        2010/12/16        1
   
8. -149042        248        2011/1/15        2011/3/16        1
   
9. -149042        222        2011/4/27        2011/6/16        1
   
10. ;
    
11. run;

复制代码

1. data b;
   
2. input cardid $ cd4 datecd4 flwdate symp $ cd41 datecd41 flwdate1 symp1 $
   
3. cd42 datecd42 flwdate2 symp2 $ cd43 datecd43 flwdate3 symp3 $ cd44 datecd44 flwdate4 symp4 $ @@;
   
4. cards;
   
5. -149042 346 2009/12/16 2010/1/28 1 307 2010/7/13 2010/7/28 1 307 2010/7/13 2010/12/16 1 248 2011/1/15 2011/3/16 1 222 2011/4/27 2011/6/16 1
   
6. ;
   
7. run;

复制代码

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：Input cards date card Data 如何

proc transpose 再merge吧。

1. data have;
   
2.   set have(where=(cd4^=.));
   
3. run;
   
4. proc sort data=have ;
   
5.   by cardid;
   
6. run;
   
7. 
   
8. 
   
9. proc transpose data=have out=want1 (drop=_name_)  prefix=cd4_;
   
10.   var cd4;
    
11.   by cardid;
    
12. run;
    
13. 
    
14. proc transpose data=have out=want2 (drop=_name_)  prefix=datecd4_;
    
15.   var datecd4;
    
16.   by cardid;
    
17. run;
    
18. 
    
19. proc transpose data=have out=want3 (drop=_name_)  prefix=flwdate_;
    
20.   var flwdate;
    
21.   by cardid;
    
22. run;
    
23. 
    
24. proc transpose data=have out=want4 (drop=_name_)  prefix=symp_;
    
25.   var symp;
    
26.   by cardid;
    
27. run;
    
28. 
    
29. data want;
    
30.   merge want1 want2 want3 want4;
    
31.   by cardid;
    
32. run;

复制代码

BTW,楼主用的好像AIDS数据，在疾控工作？

1.我就死活没有理解你的问题。。。“由多列列变成一行？”。symp代表什么？
2.BTW,楼主用的好像AIDS数据，在疾控工作？
京剧

jingju11 发表于 2011-9-16 21:19
1.我就死活没有理解你的问题。。。“由多列列变成一行？”。symp代表什么？
2.BTW,楼主用的好像AIDS数据， ...

symp 可能是symptom的缩写吧，我也只是看到CD4了猜测的。

webgu 发表于 2011-9-16 21:27
symp 可能是symptom的缩写吧，我也只是看到CD4了猜测的。

看了半天webgu的程序才理解了你的要求。他的程序很好很正确。也有一些能(改)动的地方：
1. where =(cd4^=.)?
2. sort by cardid? +flwdate?
3.prefix =cd4_ ? or prefix =cd4 等等;
京剧

webgu 发表于 2011-9-16 20:38
proc transpose 再merge吧。BTW,楼主用的好像AIDS数据，在疾控工作？

谢谢！！！

这个问题我还没有分析完...

jingju11 发表于 2011-9-16 21:19
1.我就死活没有理解你的问题。。。“由多列列变成一行？”。symp代表什么？
2.BTW,楼主用的好像AIDS数据， ...

一个cardid可能有几次的检测日期，
导致同一个cardid就可能有几次CD细胞个数或者几次symp，
CD细胞个数出现的次数与symp出现的次数没有关系,
现在想要列一个CD细胞个数的有无与symp有无的2分类配对四个表，
                symp
cd4            有                   无
有              a                     b
无              c                     d

如果某一个cardid 有3个观测（3次检测）
if  cd4_1 ne .  or cd4_2 ne . or cd4_3ne. then cd4_all='有';
else cd4_all='无';

if  symp_1 ne '1' or symp_1 ne '' or symp_2 ne '1' or symp_2 ne ''  or symp_3 ne '1' or symp_3 ne ''  then symp_all=有';
else symp_all='无';

那么此cardid 就由原来的3条观测（3行）变为1条观测（1行），
就得到a/b/c/d任一一种情况的一次频数。


所以实际上不论cd4是否为缺失或者symp是否为空白都应该保留在原始数据库中用于上述if-then条件的设置.

不知道这样解释是不是能够被各位老师理解？

jingju11 发表于 2011-9-16 21:49
看了半天webgu的程序才理解了你的要求。他的程序很好很正确。也有一些能(改)动的地方：
1. where =(cd4^ ...

谢谢！！！


1.是说要cd4 ne .没用（cd4=.也是用于下面的if then语句的，所以前面不能把它排除）？
2.是说
proc sort ;
by cardid flwdate; /*而不只是 by cardid;的意思?*/
3.是说
prefix 是否直接改为 cd4而不是cd4_?

priss111 发表于 2011-9-16 22:39
一个cardid可能有几次的检测日期，
导致同一个cardid就可能有几次CD细胞个数或者几次symp，
CD细胞个数 ...

不需要transpose 数据。否则反倒麻烦了。我有些不解的是其中形成2X2表格的实际意义。
京剧

1. proc sort data =aaa out =aaa1; by cardid; run;
   
2. proc format;
   
3.         value $sympFmt '1', ' ' ='n' other =' ';
   
4. run;
   
5. data aaa3;
   
6.         length c $1;
   
7.         do until(last.cardid);
   
8.                 set aaa1; by cardid;
   
9.                 s =sum(s, cd4);
   
10.                 c =cats(c, put(symp, $sympFmt.));
    
11.         end;
    
12.         cd4_n =(s >.);
    
13.         symp_n =(missing(c));
    
14. run;

复制代码

jingju11 发表于 2011-9-16 23:02
不需要transpose 数据。否则反倒麻烦了。我有些不解的是其中形成2X2表格的实际意义。
京剧

谢谢！！！！

这个数据还没有分析完...
等周一再运行一下您的程序，
迫不及待...
我这台电脑上的SAS不能读出有汉字的程序及数据...