data b;
set a;
x=mean(var);
if  (x-10)<=var and (x+10)>=var then output b;
run;

谢谢。

你好， 但mean 函数在这里是对一行求平均。　不是做一列求平均。

为何不用proc sql？那就只好用proc means；
data a;
input age;
cards;
12
23
34
56
78
;
run;

proc means data=a noprint;
        var age;
        output out=b(drop=_:) mean=meage;
run;

data c(drop=meage);
        merge a b;
        retain meage1;
        if first.id then meage1 =.;
        if not missing(meage) then meage1 = meage;
run;

run;

data d;
set c;
if (meage1-10)<=age and (meage1+10)>=age then output d;
run;

谢谢。 这正是我想要的。 我刚开始学SAS 。 知道用proc SQL  　。　但想用Data step 去实现同样的功能。