数据集变量值编号问题

1. data test;
   
2.   input apply_no $ no;
   
3.   cards;
   
4. 01 1
   
5. 01 2
   
6. 01 3
   
7. 01 0
   
8. 01 1
   
9. 01 2
   
10. 01 3
    
11. 01 1
    
12. 01 2
    
13. 02 0
    
14. 02 1
    
15. 02 2
    
16. ;
    
17. run;

复制代码

如上是数据集，每个appl_no中第一个一起出现的1,2,3...对应赋值为1，下一个一起出现的1,2,3...对应赋值为2，以此类推
希望得到的结果是：

1. 01 1 1
   
2. 01 2 1
   
3. 01 3 1
   
4. 01 0 0
   
5. 01 1 2
   
6. 01 2 2
   
7. 01 3 2
   
8. 01 1 3
   
9. 01 2 3
   
10. 02 0 0
    
11. 02 1 1
    
12. 02 2 1

复制代码

谢谢各位大神指点！

关键词：数据集

data test;
  input apply_no $ no;
  cards;
01 1
01 2
01 3
01 0
01 1
01 2
01 3
01 1
01 2
02 0
02 1
02 2
;
run;

data test1;
   set test;
   id=_n_;
run;

proc sort data=test1;
   by apply_no no;
run;

data test2;
   retain num;
   set test1;
   by apply_no no;
   if no=1 then do;
      if first.no then num=1;
      else num+1;
   end;
   else call missing(num);
run;

proc sort data=test2;
   by id;
run;

data want;
   set test2;
   retain tmp tmp_on;
   if not missing(num) then do;
      tmp=num;
      tmp_on=1;
   end;
   if missing(num) and dif(no)^=1 then tmp_on=0;
   if missing(num) then num=(tmp*tmp_on)+(no*(1-tmp_on));
   keep apply_no no num;
run;

l1i2n3i4n5g 发表于 2018-8-10 17:11
data test;
  input apply_no $ no;
  cards;

太有才了，这办法都想出来了，非常感谢！！