移动平均求标准差

stkcd        year                      x
4                2002        0.09852152
4              2003        0.1824853
4                2007        0.11691263
4                2009        0.10695228
4                2010        0.12780032
5                2007        0.11542379
5                2009        0.12760545
5                2011        0.18698649
7                2006        0.03826619
7                2007        -0.00600685
7                2008        -0.12493949
7                2009        -0.04187782
7                2010        -0.02071122
7                2011        0.19234499

各位老师，有如上一组数据，我想根据stkcd按两年移动求x的标准差，如果中间有缺失值就往前推直到有数据为止，比如stkcd=4，2007年的std就是用2003和2007的x计算，stkcd=7,2008年的std就是用2007和2008的x计算，请问这个用SAS应该怎么写程序？

1. /*根据stkcd按两年移动求x的标准差*/
   
2. data a;
   
3. input stkcd year x;
   
4. cards;
   
5. 4                2002        0.09852152
   
6. 4                2003        0.1824853
   
7. 4                2007        0.11691263
   
8. 4                2009        0.10695228
   
9. 4                2010        0.12780032
   
10. 5                2007        0.11542379
    
11. 5                2009        0.12760545
    
12. 5                2011        0.18698649
    
13. 7                2006        0.03826619
    
14. 7                2007        -0.00600685
    
15. 7                2008        -0.12493949
    
16. 7                2009        -0.04187782
    
17. 7                2010        -0.02071122
    
18. 7                2011        0.19234499
    
19. ;
    
20. data b;
    
21. set a;
    
22. y=lag(x);
    
23. standard=std(of x y);
    
24. run;
    
25. /*如果有缺失值就用等值填充*/
    
26. proc sort data=b out=c;
    
27. by stkcd year;
    
28. run;
    
29. 
    
30. data d;
    
31. set c;
    
32. by stkcd;
    
33. if first.stkcd then delete;
    
34. run;
    
35. /*希望对你有帮助*/

复制代码