data a;
    input a b;
    cards;
    1 1
    1 2
    1 3
    1 4
    1 50
    1 6
    1 7
    1 8
    2 9
    2 10
    2 11
    2 12
    2 13
    2 80
    2 15
    2 16
    2 16
    ;
run;

proc sql;
    create table b(where=(b<=2*avg)) as
      select *
            ,avg(b) as avg
        from a
        group by a
    ;
quit;

试了下，结果是正确的！ 非常感谢！

能再请教一个问题么~ 如果需要把每组中var2的最大值最小值算出，将最大值与最小值之差小于1的组全部删除，这个代码又该怎么写呢？

max(var2)
min(var2)

你的问题太基础了……

还有个小问题，为什么执行以后，观测的数量变多了呢？

那里多了？
应该是少了2个