- 阅读权限
- 255
- 威望
- 0 级
- 论坛币
- 125 个
- 通用积分
- 0.0040
- 学术水平
- 40 点
- 热心指数
- 45 点
- 信用等级
- 43 点
- 经验
- 32801 点
- 帖子
- 1185
- 精华
- 0
- 在线时间
- 1539 小时
- 注册时间
- 2009-7-16
- 最后登录
- 2018-10-5
学科带头人
还不是VIP/贵宾
- 威望
- 0 级
- 论坛币
- 125 个
- 通用积分
- 0.0040
- 学术水平
- 40 点
- 热心指数
- 45 点
- 信用等级
- 43 点
- 经验
- 32801 点
- 帖子
- 1185
- 精华
- 0
- 在线时间
- 1539 小时
- 注册时间
- 2009-7-16
- 最后登录
- 2018-10-5
| 开心 2014-10-30 15:36:07 |
---|
签到天数: 29 天 连续签到: 3 天 [LV.4]偶尔看看III
|
50论坛币
党fundbg4中的lastmark为1的时候,就执行下面的程序,不知道该怎样修改程序,求高手- %macro calalpha;
- data fundbg4;
- set fundbg3;
- lastmark=last.ym;
- by stkcd year ym;
- run;
- %do wknum=105 %to 140;
- %if lastmark=1 %then %do;
- data temp;
- set fundbg4;
- if &wknum-104<=wknum<=&wknum-1;
- num1=&wknum;
- run;
- proc sort data=temp out=temp1;
- by stkcd num1;
- run;
- proc reg data=temp1 noprint outest=destim edf;
- model ri_rf=rm_rf smb hml;
- by stkcd ;
- quit;
- data destim;
- set destim;
- t=&wknum;
- run;
- %if &wknum=105 %then %do;
- data dalpha;set destim;run;
- %end;
- proc append base=dalpha data=destim force;run;
- %end;
- %end;
- quit;
- %mend ;
- %calalpha;
复制代码
|
|