楼主: powerjiang
2839 2

[SAS] 一篇关于HUrst指数的报告和sas计算程序 [推广有奖]

  • 0关注
  • 0粉丝

硕士生

4%

还不是VIP/贵宾

-

威望
0
论坛币
2907 个
通用积分
2.3250
学术水平
7 点
热心指数
7 点
信用等级
7 点
经验
868 点
帖子
45
精华
0
在线时间
175 小时
注册时间
2008-9-19
最后登录
2024-3-20

+2 论坛币
k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群
赵安豆老师微信:zhaoandou666

经管之家联合CDA

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

感谢您参与论坛问题回答

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

+2 论坛币
都是原版,没有任何修改,可以直接运行的。




hurst指数计算程序(部分)
其余代码以及应用见(一篇关于HUrst指数的报告和sas计算程序



  1. *******************hurst指数计算程序*******************************
  2. **************************20140110********************************;


  3. /*1、计算周期************************该宏计算周期;
  4. %macro Husrtindex(index,n,bdate,edate);

  5. data  index;
  6. set funddata.Explainvar;
  7. if stockcode in ("&index..SH","&index..SZ") and   &bdate<date<&edate;
  8. ret=100*(log(close)-log(lag(close))); format ret 8.5;
  9. if _N_=1 then delete;
  10. if _N_=1 then i=1;else i+1;
  11. keep date stockcode close ret i;
  12. run;



  13. data data1;
  14. set index;
  15. j=int(i/%eval(&n))+1;
  16. run;
  17. proc means data=data1 std  mean noprint;
  18. var ret;
  19. by j;
  20. output out=data2(drop=_type_  _freq_)
  21.        mean=junzhi
  22.    std=bzc;
  23. run;

  24. proc sql;
  25. create table data3 as
  26. select
  27.       a.*,
  28.   b.junzhi,
  29.   b.bzc

  30. from data1 a,
  31.      data2 b
  32. where
  33.     a.j=b.j;
  34. quit;

  35. data data3;
  36. set data3;
  37. if ret=. then delete;
  38. run;

  39.   
  40. data data4;
  41. set data3;
  42. retain licha;
  43. by j;
  44. if first.j then licha=ret-junzhi; else
  45.                 licha=licha+(ret-junzhi);

  46. retain maxlicha;
  47. if first.j then maxlicha=licha;else
  48.            if maxlicha<licha then maxlicha=licha;
  49. retain mixlicha;
  50. if first.j then mixlicha=licha ;else
  51.            if mixlicha>licha then mixlicha=licha;
  52. if last.j then  R=(maxlicha-mixlicha)/bzc; else
  53.           delete;

  54. retain SumR;
  55. if j=1 then SumR=R; else SumR=SumR+R;

  56. format licha mixlicha  maxlicha R SumR 12.5 ;
  57. *drop close ret junzhi licha    mixlicha  maxlicha bzc ;
  58. run;

  59. proc sort data=data4;
  60. by descending date;
  61. run;
  62. data data5;
  63. set data4;
  64. if _N_=1;
  65. AveR=SumR/j;
  66. LogAveR=log(SumR/j);
  67. logn=log(%eval(&n));
  68. n=%eval(&n);
  69. *stockcode="&index..SH";
  70. format logn LogAveR  AveR 8.5;
  71. keep stockcode logn LogAveR n AveR;
  72. run;

  73. proc append base=dxdata.hurstdata data=data5 force ;
  74. run;
  75. %mend;

  76. *%Husrtindex(000001,12,'01jan1999'd,'01jan2006'd);
  77. *%Husrtindex(000001,12,'01jan2006'd,'15apr2010'd);
  78. *%Husrtindex(000001,12,'16apr2010'd,'10jan2014'd);
  79. *%Husrtindex(000001,12,'01jan1999'd,'10jan2014'd);
复制代码

二维码

扫码加我 拉你入群

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

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

关键词:sas计算程序 Hurst指数 hurst 计算程序 Urs 程序 HUrst指数 sas计算程序

已有 2 人评分经验 论坛币 学术水平 热心指数 信用等级 收起 理由
niuniuyiwan + 100 + 100 + 5 + 5 + 5 精彩帖子
fantuanxiaot + 15 + 1 + 1 + 1 精彩帖子

总评分: 经验 + 115  论坛币 + 100  学术水平 + 6  热心指数 + 6  信用等级 + 6   查看全部评分

本帖被以下文库推荐

沙发
小熊齐 发表于 2015-4-12 09:54:26 |只看作者 |坛友微信交流群
求问R语言如何计算序列的hurst指数

使用道具

藤椅
yuchangle 发表于 2017-8-23 19:51:16 |只看作者 |坛友微信交流群
回帖赚点币,下载要50.。。

使用道具

您需要登录后才可以回帖 登录 | 我要注册

本版微信群
加好友,备注jltj
拉您入交流群

京ICP备16021002-2号 京B2-20170662号 京公网安备 11010802022788号 论坛法律顾问:王进律师 知识产权保护声明   免责及隐私声明

GMT+8, 2024-6-7 03:24