如何产生一个新的变量

1. data aaa;
   
2. input no x$;
   
3. cards;
   
4. 1  a
   
5. 1  a
   
6. 1  c
   
7. 1  c
   
8. 2  b
   
9. 2  b
   
10. 2  d
    
11. 2  d
    
12. 3  n
    
13. 3  n
    
14. 3  m
    
15. 3  m
    
16. ;
    
17. run;

复制代码

希望产生一个新变量y
no x y
1  a  1
1  a  1
1  c  2
1  c  2
2  b  1
2  b  1
2  d  2
2  d  2
3  n  1
3  n  1
3  m 2
3  m 2

proc sort data=aaa;
by no x;
run;

data wanted;
set aaa;
by no x;
if first.no then y=0;
if first.x then y+1;
run;

data aaa;
   set aaa;
      retain y 0;
          x1=lag(x);
          if x^=x1 then y=y+1;
          if no^=lag(no) then y=1;
          drop x1;
run;