SetSysParam(PN_Rate(),1);
SetSysParam(pn_date(),inttodate(20120918));
SetSysParam(PN_Cycle(),cy_day());
SetSysParam(pn_Rateday(),-1);
SetSysParam(pn_stock(),"SH600036");
close1 := nday3(500,close());
SetSysParam(pn_stock(),"SH600000");
close2 := nday3(500,close());
ret := Times_Cointergration_test(close1,close2,1,0.05,1,"AIC");
resid := ret["resid"];
return Times_ECM(close1,close2,resid,0.05,2,2);
结果:
ECM项为负,结果表明上证指数与深证综指存在长期稳定的协整关系,可在短期内保持均衡
Times_ADFTest Times_Cointergration_test Times_Granger