no和group取值相同保留第一个

1. data aaa;
   
2. input no group zb$ x;
   
3. cards;
   
4. 1 1 a 1
   
5. 1 1 a 2
   
6. 1 1 a 1
   
7. 1 1 b 1
   
8. 1 1 b 1
   
9. 1 1 b 1
   
10. 1 1 b 1
    
11. 2 1 a 3
    
12. 2 1 a 4
    
13. 2 1 a 2
    
14. 3 2 a 1
    
15. 3 2 a 1
    
16. 3 2 a 1
    
17. 3 2 b 5
    
18. 3 2 b 5
    
19. 3 2 b 1
    
20. 4 1 b 2
    
21. 4 1 b 1
    
22. 4 1 b 2
    
23. ;
    
24. run;

复制代码

要求no和group取值相同保留第一个，同一个个体中zb取值相同也保留第一个。
希望得到的数据集如下：
1 1 a 1
        2
        1
     b 1
        1
        1
        1
2 1 a 3
        4
        2
3 2 a 1
        1
        1
     b 5
        5
        1
4 1 b 2
        1
        2

1. data aaa;
   
2. input no group zb$ x;
   
3. cards;
   
4. 1 1 a 1
   
5. 1 1 a 2
   
6. 1 1 a 1
   
7. 1 1 b 1
   
8. 1 1 b 1
   
9. 1 1 b 1
   
10. 1 1 b 1
    
11. 2 1 a 3
    
12. 2 1 a 4
    
13. 2 1 a 2
    
14. 3 2 a 1
    
15. 3 2 a 1
    
16. 3 2 a 1
    
17. 3 2 b 5
    
18. 3 2 b 5
    
19. 3 2 b 1
    
20. 4 1 b 2
    
21. 4 1 b 1
    
22. 4 1 b 2
    
23. ;
    
24. run;
    
25. 
    
26. proc sortdata=aaa;
    
27.         by no group zb;
    
28. run;
    
29. 
    
30. data b;
    
31.         set aaa;
    
32.         by no group zb;
    
33.         if not first.group then do;
    
34.         no=.; group=.;end;
    
35.         if not first.zb then zb='';
    
36.         run;

复制代码