求程序

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

   数据类似下面的：
  a   b  c
  2   2  1  
  2   2  1  
  3  1  2  
  3  1  2  
  9  9  9   
8   8   8   
找出数据里重复的记录，并给每个重复组编号，如下
  a   b  c   组号
  2   2  1    1
  2   2  1    1
  3   1   2   2
  3   1   2   2  

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：程序

data a;                                                                                                                                 
input a b c;                                                                                                                           
cards;                                                                                                                                 
                                                                                                                                       
2   2  1                                                                                                                                
2   2  1                                                                                                                                
3   1  2                                                                                                                                
3   1  2                                                                                                                                
9   9  9                                                                                                                                
8   8  8                                                                                                                                
;                                                                                                                                       
run;   
proc sql;                                                                                                                              
create table f as                                                                                                                       
select a,b,c,count(*) as cishu  from e                                                                                                  
group by a,b,c                                                                                                                          
having(count(*))>1                                                                                                                     
;        
data h (drop=cishu i);                                                                                                                 
set f;                                                                                                                                 
do i=1 to cishu;                                                                                                                        
   output;                                                                                                                              
end;                                                                                                                                    
run;  
data j;                                                                                                                              
      retain n;                                                                                                                        
set h;                                                                                                                                 
by a b c notsorted;                                                                                                                     
if first.c then n+1;                                                                                                                    
run;     

1. data test;
   
2. input a b c;
   
3. cards;
   
4. 2  2  1  
   
5. 2  2  1  
   
6. 3  1  2  
   
7. 3  1  2  
   
8. 9  9  9   
   
9. 8  8  8   
   
10. ;
    
11. 
    
12. proc sql;
    
13. create table wanted as
    
14. select a.*,b.grp from
    
15. test a right join
    
16. (select *, monotonic() as grp from
    
17. (select distinct * from test
    
18. group by a,b,c
    
19. having count(*)>1)) b
    
20. on a.a=b.a and a.b=b.b and a.c=b.c;
    
21. quit;

复制代码