判断股票涨幅与各财务指标的相关系
endt:=inttodate(20100910);
stklist:=GetBKByDate('sh000300',endt);
y:=array();
x:=array();
For i:=0 to length(stklist)-1 do
Begin
setsysparam(pn_stock(),Stklist[i]);
setsysparam(pn_date(),endt);
setsysparam(pn_rate(),1);
RDate:=NewReportDateOfEndT2(EndT);
y[i]:=stockzf3();
x[i][0]:=Last12MData(RDate,9900000);//每股收益
x[i][1]:=Last12MData(RDate,9900003);//每股净资产
x[i][2]:=Last12MData(RDate,9900100);//净资产收益
x[i][3]:=Last12MData(RDate,9900108);//净利润率
x[i][4]:=Last12MData(RDate,9900203);//资产负债率
x[i][5]:=Last12MData(RDate,9900004);//净资产增长率
x[i][6]:=ln(StockMarketValue(EndT)); //流通市值
end;
return Regress_Stepwise(y,x,0.05,0.1);
结果:
ret["x"]:array(4,2)
ret["regress"]:和[Regression]的输出结果是一样的格局
Regression Regress_pri Regress_Ridge Regress_VIF boxcox