不太会写宏，哪个高手能帮一下忙

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

目的是rolling求12个月的两次购买以上人的占比，endtime这边要跑12次，太不智能呢，哪位高手能帮忙改改code，用宏表现一下，谢谢


%let Endtime='31jan2009'd;
data sales(KEEP=CUSTOMERID ID);
set sales1;
id=customerid||purchasetime||store;
if  &endtime-365<=purchasetime<=&endtime and customerid ne 'NULL';
run;
PROC SORT DATA=sales; BY ID; RUN;
DATA FREQ (KEEP=CUSTOMERID ID);
   SET sales;
   BY ID;
   IF LAST.ID;
RUN;
DATA FREQ ;
   SET FREQ;
   BY CUSTOMERID;
   IF FIRST.CUSTOMERID THEN DO;
       F=0;
   END;
   F+1;
   IF LAST.CUSTOMERID THEN OUTPUT;
RUN;
proc sql;
create table aa as select count (distinct(case when f>=2 then customerid else '1' end)),count( customerid),count (distinct(case when f>=2 then customerid else '1' end))/count( customerid) from FREQ;
quit;

扫码加我 拉你入群

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

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

分享0 收藏2 回帖

关键词：Customer purchase rolling custom sales store count 智能

在流水和需要回滚观测的时间点不太大的前提下
SQL应该是一个挺不错的选择，算了目标客户和总量，没有算目标占比 -_-!!!

1. data sales;
   
2.         do customerid=10001 to 10050 by 1;
   
3.                 do purchasetime='01jan2008'd to '31dec2009'd;
   
4.                         if ranuni(0)<=0.002 then output;
   
5.                 end;
   
6.         end;
   
7.         format purchasetime yymmdd10.;
   
8. run;
   
9. 
   
10. data date;
    
11.         do i=1 to 12 by 1;
    
12.                 date=intnx("MONTH","31Jan2009"d,i-1,"ENDING");
    
13.                 output;
    
14.         end;
    
15.         drop i;
    
16.         format date yymmdd10.;
    
17. run;
    
18. 
    
19. proc sql;
    
20.         create table result as
    
21.                 select
    
22.                         date
    
23.                         ,sum(case when cnt>=2 then 1 else 0 end) as cnt_target
    
24.                         ,count(*) as cnt_all
    
25.                 from
    
26.                         (select
    
27.                                 a.date
    
28.                                 ,b.customerid
    
29.                                 ,count(*) as cnt
    
30.                                 from date a
    
31.                                 left join sales b
    
32.                                 on b.purchasetime between intnx("YEAR",a.date,-1,"SAMEDAY")+1 and a.date
    
33.                                 group by a.date,b.customerid)
    
34.                 group by date
    
35.         ;
    
36. quit;

复制代码

当数据量巨大的话，可以用一个data步来搞定到客户每个时点的次数标记，再进行统计......

你很牛，thanks

2# soporaeternus
哥们
写的不错