1# jpingl1273

data l;
input x@@;
if x<100 then count=1;
else; if x>=100 then count=.;
datalines;
73.499878
87.406372
38.898289
163.500153
100.398247
207.5
168.703308
29.898287
963.000122
45.898289
185.601715
972.999878
9.8984
15.203313
42.695187
834.999939
216.500061
444.703247
20.601563
79.093628
273
273.000061
396.906311
406.296722
49.796963
75.601501
;
run;
　
data need (keep=subtotal);
set l;
by count notsorted;
if first.count then do;
               subtotal=0;
               group=0; end;
           group+1;
           subtotal+x;
if first.count and last.count then delete;
if last.count and count ne .;
run;

呵呵 谢谢你的回复
我最终要的是符合条件的组数以及这些组一共有多少个数据（要的是个数），最总其实要的是总的个数除以组数 2# sas_user

3# jpingl1273
以下是改过的，再试一下？如果不对，我再改。

　
data need ;
set l end=end;
by count notsorted;
if first.count then do; subtotal=0; group+1; end;
subtotal+x;
if first.count and last.count then delete;
if count = . then delete;
drop count;
run;


proc sql;
select count(x)/(count (distinct group)) as result from need;
quit;

data l;
input x@@;
datalines;
73.499878
87.406372
38.898289
163.500153
100.398247
207.5
168.703308
29.898287
963.000122
45.898289
185.601715
972.999878
9.8984
15.203313
42.695187
834.999939
216.500061
444.703247
20.601563
79.093628
273
273.000061
396.906311
406.296722
49.796963
75.601501
;
run;
data n;
set l;
if x<100 then count=1;
else  count=.;
if  count then temp+count;
else temp=0;
if  temp>=3 then do;
     total_group+1;
  total_num+temp;
end;

proc sql;
create table numb as
select max(total_group) as t_group,
        max(total_num)   as t_num,
        max(total_num)/max(total_group) as ratio
  from  n;

3# jpingl1273

"最总其实要的是总的个数除以组数"
总的个数是不是指小于100的连在一起的数字的个数？组数是不是指小于100的连在一起的数字共有多少组？请楼主确认是不是我理解错了？总个数除以组数是不是10/4呢？