求助 关于字符串的

相似文件 换一批

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

ID        NAME                                                        ID         NAME
1        张三 李四 张三 张三 李四                        1        张三 李四

现在有左边的那个数据集，怎么变成右边的啊。就是我有一个字符串，有相同的字符，现在把相同的只保留一个，然后列出来。用SAS怎么做……

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：字符串 name 数据集 怎么做 字符串

能不能把源数据发出来几条看一下

舍身卫道 发表于 2015-5-29 18:09
能不能把源数据发出来几条看一下

上传了，谢谢

为什么还要论坛币

先按空格分列再处理？ （虽然有点笨

1. data a;
   
2.     length y $88.;
   
3.     input y  x ;
   
4.     cards;
   
5. yt|yw|zm|yt  1
   
6. ac|bc|dd|bc  2
   
7. ;
   
8. run;
   
9. data b ;
   
10.     set a ;
    
11.     n=count(y,"|")+1;
    
12.     do i =1 to n;
    
13.         yy=scan(y,i,"|");output;
    
14.     end;
    
15.     proc sort nodupkey; by x n  yy;
    
16. run;
    
17. proc sql;
    
18.     select count(distinct x) into:nn from b ;
    
19. quit;
    
20. %macro getNames();
    
21. %do i= 1 %to &nn;
    
22.     %let y&i=;
    
23.     data _null_ ;
    
24.         set b (where=(x=&i) drop=y) ;
    
25.         rc=dosubl(cat('%let y&i=&&y&i. ',yy,";")) ;
    
26.     run;
    
27.     data c&i;
    
28.         set b(where=(x=&i) drop=y)  ;
    
29.         y=tranwrd("&&y&i"," ","|"); output;
    
30.     run;
    
31. %end;
    
32.     data c (keep=x y);   
    
33.         set c: ;
    
34.         by x ;
    
35.         proc sort nodup; by x y ;
    
36.     run;
    
37. %mend;
    
38. %getNames;

复制代码

hope this will help you