如何得到id下不同取值的个数

1. data aaa;

复制代码

data aaa;
input id treat x$;
cards;
1 1 a1
1 1 a1
1 1 a2
1 1 a2
2 2 c1
2 2 c1
3 2 a1
3 2 a1
3 2 b2
4 1 b1
4 1 b2
4 1 c1
4 1 c2
;
run;


/*如何用data步得到这样的数据 id中不同x的个数*/
id treat num
1  1 2
2  2 1
3  2 2
4  1 4
谢谢！

1. data aaa;
   
2. input id treat x$;
   
3. cards;
   
4. 1 1 a1
   
5. 1 1 a1
   
6. 1 1 a2
   
7. 1 1 a2
   
8. 2 2 c1
   
9. 2 2 c1
   
10. 3 2 a1
    
11. 3 2 a1
    
12. 3 2 b2
    
13. 4 1 b1
    
14. 4 1 b2
    
15. 4 1 c1
    
16. 4 1 c2
    
17. ;run;
    
18. 
    
19. data bbb;
    
20. set aaa;
    
21. by id x;
    
22. if first.id then count=0;
    
23.    if first.x then count+1;
    
24.    if last.id then output;
    
25.    drop x;
    
26. run;

复制代码

yongyitian 发表于 2016-9-1 20:02

1. data ccc1;
   
2.         set aaa;
   
3.         by id x;
   
4.         if first.id then count=0;
   
5.         if first.x then count+1;
   
6.         if last.id then output;
   
7. run;

复制代码

和我的一样！

如果先去重

1. proc sort data=aaa nodup;
   
2.         by id x;
   
3. run;

复制代码

如何实现呢

dxystata 发表于 2016-9-1 20:21
和我的一样！

如果先去重如何实现呢

proc sort data=aaa out=ccc nodupkey;
   by id x;
run;

data ddd;
   set ccc;
   by id;
   if first.id then count=1;
    else count+1;
   if last.id then output;
   drop x;
run;