请教：提取数据

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

请教高手，如何实现提取周数据和日数据的结合：即够一周的取周五的数据，不够一周的要取每一天的日数据。该怎样实现？

例如：

20100628	1
20100629	1
20100630	1			想要的结果：
20100701	1			20100702	1
20100702	1			20100709	2
20100705	2			20100712	3
20100706	2			20100713	3
20100707	2			20100714	3
20100708	2
20100709	2
20100712	3
20100713	3
20100714	3

   其中20100629——20100702为一周五天的数据，我只取20100702即周五的数据，同理，下周只取20100709的数据，但是第三周不足五天，所以我每一天都取，我用last.week都取到了最后一天的数据。无法实现我想要的结果，希望高手指点！

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏1 回帖

关键词：Last 请教高手 如何实现 高手指点 Week 请教

1. data raw;
   
2.         input date yymmdd8. week;
   
3.         format date yymmdd10.;
   
4. datalines;
   
5. 20100628 1
   
6. 20100629 1
   
7. 20100630 1
   
8. 20100701 1
   
9. 20100702 1
   
10. 20100705 2
    
11. 20100706 2
    
12. 20100707 2
    
13. 20100708 2
    
14. 20100709 2
    
15. 20100712 3
    
16. 20100713 3
    
17. 20100714 3
    
18. ;
    
19. 
    
20. data out(drop=_temp);
    
21.         _temp=0;
    
22.         do _n_=1 by 1 until(last.week);
    
23.                 set raw;
    
24.                 by week;
    
25.                 _temp+1;
    
26.         end;
    
27.         if _temp=5 then output;
    
28.         do _n_=1 to _n_;
    
29.                 set raw;
    
30.                 if _temp<5 then output;
    
31.         end;
    
32. run;

复制代码

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




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

1. data raw(drop=last_week);
   
2.         retain last_week;
   
3.         if _n_=1 then
   
4.                 do until(last);
   
5.                         set raw end=last;
   
6.                         last_week=max(week,last_week);
   
7.                 end;
   
8.         set raw;
   
9.         by week;
   
10.         if week=last_week then output;
    
11.         else if last.week then output;
    
12. run;

复制代码

学习了。。。

data raw;
  input date yymmdd8. week;
  format 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
20100719 4
;
run;
proc sql noprint;
  select max(week) into :max_week
   from raw;
quit;
proc sort data=raw;
  by week date;
run;

data raw_slct;
  set raw;
  by week;
  if last.week or week=&max_week then output;
run;

这么好的程序帖子，愣是没有多少人顶，看。不知道都想些什么。

我顶上去。

其实，学习sas一定要多看其他人的程序，是最快的捷径。

况且，本坛的几位高人都在这个帖子露脸了。

学习了！
高人啊！