data test;
        input date $ result;
        week=week(input(date,yymmdd10.));
        datalines;
20100628 1     
20100629 1     
20100630 1   
20100701 1   
20100702 1   
20100705 2   
20100706 2   
20100707 2   
20100708 2   
20100709 2     
20100712 3     
20100713 3     
20100714 3  
;
run;


proc sql;
        create table test1 as
        select *,count(*) as days
        from test
        group by week
        order by week,date;
quit;

data test1;
        set test1;
        by week date;
        if days<5 then output;
        else if last.week then output;
run;

3# moonstarpursuit


我用你的方法实现了，非常感谢，但是我又有个新问题想请教一下：

20100628	1
20100629	1
20100630	1
20100701	1
20100702	1		想要的结果：
20100705	2		20100702	1
20100706	2		20100709	2
20100707	2		20100714	3
20100708	2		20100719	4
20100709	2		20100720	5
20100712	3		20100721	5
20100713	3		20100722	5
20100714	3
20100715	4
20100716	4
20100717	4
20100718	4
20100719	4
20100720	5
20100721	5
20100722	5

就是我现在的数据中间也会遇到不足一周的情况，但是这些数据我不要，只要最后不足一周的数据，其余都取最后一天的数据，能再帮帮我解决一下吗？非常感谢!

2# hopewell




很感谢你，你的方法很好，但是我现在又遇到了新的问题，你能帮忙再看看吗？