关于一个观测缺失时，如何用下一个不缺失的值进行替换

在编程时遇到了如下问题
我的数据中有一部分值是缺失的。
比如col1 obs5是缺失的，这个情况下我想用col1的obs6来替换，让obs5的观测值等于obs6.
请问该如何操作？
谢谢！

1. data a;
   
2. input col1 @;
   
3. cards;
   
4. 1 . 3 . 4 . 7 . . 0
   
5. ;
   
6. run;
   
7. 
   
8. %macro jj(ind,out);
   
9. data _null_;
   
10. set &ind end=eof;
    
11. call symputx(cats('var',_n_),col1);
    
12. if eof then symputx(tot,_n_);
    
13. run;
    
14. 
    
15. data &out.;
    
16. set &ind ;
    
17. %do i=1 %to %eval(&tot. -1);
    
18.   %let j=%eval(&i+1);
    
19. if _n_=&i and col1 eq . then col1=&&var&j.;
    
20. %end;
    
21. run;
    
22. 
    
23. data check;
    
24. set &out.;
    
25. if col1=. then do; put "war" "ning: Pls continue using macro jj " col= ;output;end;
    
26. run;
    
27. 
    
28. %mend jj;
    
29. %jj(a,b);
    
30. %jj(b,c);

复制代码

单缺：

1. data have;
   
2.   do _n_ = 1 to 10;
   
3.     i = ifn(_n_ = 5,.,_n_);
   
4.     output;
   
5.   end;
   
6. run;
   
7. 
   
8. data want;
   
9.   set have end = last;
   
10.   position = _n_ + 1;
    
11.   if ~ last then set have(keep = i rename = i=ix) point = position ;
    
12.   i = ifn(missing(i),ix,i);
    
13. run;

复制代码

连缺：

1. data have;
   
2.   do _n_ = 1 to 10;
   
3.     i = ifn(_n_ in (5, 6),.,_n_);
   
4.     output;
   
5.   end;
   
6. run;
   
7. 
   
8. data x(keep = obs i);
   
9.   set have;
   
10. 
    
11.   obs = _n_;
    
12. run;
    
13. 
    
14. data want;
    
15.   set have end = last;
    
16. 
    
17.   if _n_ = 1 then do;
    
18.     dcl hash h(dataset:'x');
    
19.         h.definekey('obs');
    
20.         h.definedata('i');
    
21.         h.definedone();
    
22.   end;
    
23. 
    
24.   do while(~last and missing(i));
    
25.     obs = max(_n_, obs) + 1;
    
26.         h.find();
    
27.   end;
    
28. run;

复制代码

Tigflanker 发表于 2018-4-17 14:02
单缺：连缺：

非常感谢！