sas缺失值替补

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

我有一组数据，country，year，corruption.
部分数据如下：
country year corruption
CHE  2010 5
CHE  2009 8
CHE  2008 .
CHE  2007 .
CHE  2005 .
CAN  2010 .
CAN  2009  5
CAN  2008  .
CAN  2007  6
现在需要对于每一个country；用最近的非缺失值填补缺失值。首选用年份大的数据填补年份小的缺失值。如果大于其的年份也是缺失值时，使用最近的年份小的数据填补。也即2010年时缺失值时，就用2009年填补。如果2009年缺失，就用2008年填补2009和2010的缺失值。但是如果2009年和2007年都存在数据时，用2009年填补2008年的缺失值。
上表补完应为：
country year corruption
CHE  2010 5
CHE  2009 8
CHE  2008 8
CHE  2007 8
CHE  2005 8
CAN  2010 5
CAN  2009  5
CAN  2008  5
CAN  2007  6

这个在sas中如何实现呢？谢谢！

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏1 回帖

关键词：缺失值 CORRUPTION Country Corrupt Count corruption country

1. DATA TEST;
   
2. INPUT country $ year corruption;
   
3. CARDS;
   
4. CHE  2010 5
   
5. CHE  2009 8
   
6. CHE  2008 .
   
7. CHE  2007 .
   
8. CHE  2005 .
   
9. CAN  2010 .
   
10. CAN  2009  5
    
11. CAN  2008  .
    
12. CAN  2007  6
    
13. ;
    
14. RUN;
    
15. PROC SORT DATA=TEST;BY country DESCENDING  year;RUN;
    
16. 
    
17. DATA TEST;
    
18. RETAIN _Max_Year _max_value;
    
19. SET TEST;
    
20. by  country;
    
21. if first.country then do;_Max_Year=.;_max_value=.;end;
    
22. if corruption ne . then do;_Max_Year=year;_max_value=corruption;end;
    
23. run;
    
24. 
    
25. PROC SORT DATA=TEST;BY country year;RUN;
    
26. 
    
27. DATA TEST;
    
28. RETAIN _Min_Year _min_value;
    
29. SET TEST;
    
30. by country;
    
31. if first.country then do;_Min_Year=.;_min_value=.;end;
    
32. if corruption ne . then do;new_corruption=corruption; _Min_Year=year;_min_value=corruption;end;
    
33. else do;
    
34.                 if _Min_Year=. and _Max_Year=. then do;new_corruption=.;new_year=.;end;
    
35.                 else if _Min_Year=. then do;new_corruption=_max_value;new_year=_Max_Year ;end;
    
36.                 else if _Max_Year=. then do;new_corruption=_min_value;new_year=_Min_Year ;end;
    
37.                 else if (_Max_Year-year)<=(year-_Min_Year) then do;new_corruption=_max_value;new_year=_Max_Year ;end;
    
38.                 else do;new_corruption=_min_value;new_year=_Min_Year ;end;
    
39.                 end;
    
40. drop _:;
    
41. run;

复制代码

moyunzheng 发表于 2013-4-23 17:12

非常感谢！

moyunzheng 发表于 2013-4-23 17:12

非常感谢！