股票市场风险指标计算.pptx

计算指标与环境理论模型其中,为股票j的超额收益;为市场超额收益;和为参数,且假定不相关。将方差作为风险的度量,根据上述假设得到股票j的总风险为:选定时期,根据经验数据可以得模型参数的最小二乘估计以及相应估计值。于是,系统风险占该股票总风险的比例估计值为:有计算指标计算1999至2005年,沪深两地股票市场系统风险系数、个股总风险和个系统风险占总风险比例三个风险指标等。即具体计算:系统风险系数估计值;个股总风险估计值;系统风险占总风险比估计值;全市股票上述三种指标的概况统计量。计算环境计算数据集:银行存款利率BankIr;基准利率BchmkIr;个股日收益Dret;市场日收益DretM。时期:2005年。样本:沪深两市场满足条件的2006年前上市所有股票日百分比收益。剔除1年内交易小于50天的股票。算法实现第一步:创建无风险利率数据集RF;2005年市场日收益数据。第二步:创建宏文本:。第三步:计算2005年沪深两市场A股个股风险指标。第四步:沪深两市场个股与市场风险关系统计分析。计算程序创建无风险利率数据集:/*1998年7月1日后使用七日回购利率两周指数加权平均为基准利率*/dataa;;ifcode="B2W"anddate>='1jun1998'd;renameir=rf;keepirdate;run;/*1998年7月1日前用一年期银行存款利率加10%为基准利率*/datab;;ifcode="d1y";run;datac;setb;formatdateyymmdd10.;ifenddt=.Thenenddt=date();dodate=begdttoenddt;output;end;run;datad;setc;ifdate<'1jun1998'd;keepdaterf;rf=ir*;/*在一年期存款利率的基础上再增加10%*/run;/*合并得到基准利率表rfyr*/datarfyr;setda;ifdate<=’31dec2005’d;run;/*得到日基准利率表rf*/datarf;setrfyr;rf=rf/365;/*将利率转化为日利率*/run;2005年市场日收益数据DretM2005:总市值加权平均市场日收益率。DataDretM2005;;Ifyear(date)=2005andExchflg=’0’andMktflg=’AB’;/*Exchflg=’0’-沪、深两交易所;Mktflg=’AB’-AB股票市场*/KeepdateDretmc;Run;创建宏文本:。利用选择的样本股票收益数据集Dret创建宏。如果要计算全部股票的风险指标,可以直接利用lstkinfo创建宏。Dataa;;Ifdif(stkcd)=0thendelete;data_null_;seta;a='%a(';b=',';c=');';file"";puta$stkcd$b$lstknm$c$;run;%a(000001,S深发展A);%a(000002,万科A);%a(000004,*ST国农);%a(000005,ST星源);%a(000007,深达声A);%a(000009,S深宝安A);%a(000011,S深物业A);%a(000012,南玻A);%a(000016,深康佳A);%a(000017,S*ST中华);%a(200011,深物业B);%a(200012,南玻B);…………计算2005年沪深两市场个股风险指标:模型r_s=a+beta*r_m+e/*2005年无风险利率数据集rf2005*/Datarf2005;Setrf;Ifyear(date)=2005;Run;/*2005市场超额收益数据集*/DataPDretM2005;MergeDretM2005rf2005;Bydate;rm=Dretmc-rf;keepdaterm;run;dataPDretM2005;/*收益数据缺失时,用前面交易日的数据填充*/setPDretM2005;retainr_m;ifrm^=.Thenr_m=rm;droprm;run;/*2005年个股票超额收益数据集*/Datadret;;Whereyear(date)=2005;Run;Procsql;CreatetablePdret2005asSelect*=;Run;Procsortdata=Pdret2005;Bystkcddate;Run;DataPdret2005;Set