data步如何实现

1. data aaa;
   
2. input x;
   
3. cards;
   
4. 10
   
5. 10
   
6. 10
   
7. 10
   
8. 9
   
9. 9
   
10. 12
    
11. 12
    
12. 12
    
13. 12
    
14. 8
    
15. 8
    
16. 8
    
17. 8
    
18. 13
    
19. 13
    
20. ;
    
21. run;

复制代码

希望得到的数据如下：x y

10 1
10 1
10 1
10 1
9  2
9  2
12 3
12 3
12 3
12 3
8  4
8  4
8  4
8  4
13 5
13 5

1. data aaa;
   
2.         input x;
   
3. cards;
   
4. 10
   
5. 10
   
6. 10
   
7. 10
   
8. 9
   
9. 9
   
10. 12
    
11. 12
    
12. 12
    
13. 12
    
14. 8
    
15. 8
    
16. 8
    
17. 8
    
18. 13
    
19. 13
    
20. ;
    
21. run;
    
22. 
    
23. data want;
    
24.         set aaa;
    
25.         by x notsorted;
    
26.         if first.x then order+1;
    
27. run;

复制代码

1. data test;
   
2.     set aaa;
   
3.     lagx=lag(x);
   
4.     if x^=lag(x) then
   
5.         y+1;
   
6.     drop lagx;
   
7. run;

复制代码

1. data test;
   
2.   set aaa;
   
3.   y+x^=lag(x);
   
4. run;

复制代码

data b;
  set aaa;
        retain y;
  if x^=lag(x) then y+1;
run;

对于使用Stata的用户，提供一个解决方案

1. cap drop y
   
2. egen y = group(x)

复制代码