sas求助

请问sas如何实现以下数据处理：
假设我有100个观测值，两个变量age和income。我想求出每个观测值所在年龄阶段（比如age相差不超过2年）的所有人的income平均值。
我的思路是写一个macro，先提取出与当前观测值年龄不超过2年的所有观测值，然后在求出income的均值返回。
由于本人是sas初学者，想请教一下如何编写这种macro？

1. data Income;
   
2.    do ID = 10001 to 10010;
   
3.         age = 20 + int(ranuni(12345)*15);
   
4.         income = 2000 + int(ranuni(12345)*2000);
   
5.       output;
   
6.    end;
   
7. run;
   
8. 
   
9. /* using hash object */
   
10. data wanted (rename=(age1=age income1=income));
    
11.    if _n_ = 1 then do;
    
12.       declare hash h(dataset: 'income');
    
13.          h.definekey ('id');
    
14.          h.definedata('age', 'income');
    
15.          h.definedone();
    
16.       declare hiter HIter('h');
    
17.    end;
    
18.    set income(rename=(age=age1 income=income1));
    
19.        s = 0; n=0;
    
20.        rc=hiter.first();
    
21.        do while(rc=0);
    
22.           if abs(age1-age)<=3 then do;
    
23.              s = s + income;
    
24.              n = n+1;
    
25.           end;
    
26.          rc = hiter.next();
    
27.        end;
    
28.        avg_income = s/n;
    
29.     keep id age1 income1 avg_income;
    
30. run;

复制代码

看来，hash用的好，没有问题办不了