求教如何得到所有出现过的文本数据

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

新人求教，刚刚接触，题目描述可能不够准确，包涵包涵。
现在在处理一组文本数据，基本信息如下：
原数据是抽取300+医生对40门课进行排名，所以横排是排名，纵排是医生，数据是课程：
               rank1              rank2            rank3         ``````       rank10
doc1       course 1         course 5         course 2      ``````      course 36
doc 2      course 3         course 4         course 7       ``````      course 18
```````
doc 328

我才刚刚接触这个数据，最终希望能够完成一个新的表格，横排是课程，纵排是医生，数据是数量化的排名（e.g. rank1=1，rank2=2···），如下：

               course 1              course 2            course 3         ``````       course 40
doc1           1                          8                     6                ``````
doc 2          4                          0                     1                ``````
```````
doc 328


现在希望做的第一步是将所有课程提取出来，可以构成新表格的横排。原以为直接由函数可以得到，但是没找到，如果有的话麻烦各位大神告诉我一下，不胜感激！之后我也试了一些程序（包括sql），确实没能得出来想要的结果，恳请各位大神赐教，或者给我提供一个思路就成，非常感谢！

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：文本数据 Course Rank 不胜感激 非常感谢 course 如何 课程 信息

1. data a;
   
2. length name $7. r1-r10 $20. ;
   
3. input name  r1-r10 @@ ;
   
4. datalines;
   
5. doc1 c1 c3 c4 c7 c9 c8 c2 c5 c18 c20
   
6. doc20 c3 c4 c2 c12 c17 c8 c22 c26 c38 c33
   
7. doc7 c6 c7 c17 c27 c29 c28 c22 c25 c11 c32
   
8. doc11 c1 c2 c3 c4 c5 c6 c7 c8 c19 c40
   
9. doc167 c4 c6 c8 c5 c19 c18 c12 c15 c28 c30
   
10. ;
    
11. run;
    
12. 
    
13. 
    
14. data b;
    
15. set a;
    
16. %macro j;
    
17. length rr1-rr10 $30.;
    
18. %do j=1 %to 10;
    
19. rr&j.=strip(r&j.)||'*'||strip(put(&j.,best.));
    
20. 
    
21. %do i=1 %to 40;
    
22. if r&j="c&i." then c&i.=input(scan(rr&j,2,'*'),best.);
    
23. %end;
    
24. 
    
25. %end;
    
26. 
    
27. keep name r1-r10 c:;
    
28. run;
    
29. %mend ;
    
30. %j;

复制代码

lovexialulu 发表于 2017-2-20 12:33

刚刚看到，我还需要自己研究一下，非常非常感谢。

lovexialulu 发表于 2017-2-20 12:33

我还不太会用这个bbs，本来想评分里设置论坛币，聊表心意，没弄明白又不能再评分，实在抱歉，如果你需要什么资料我可以帮你下载，或者你再回复我我再试一下。抱歉抱歉，非常感谢