運用SAS對股票場風險指標計算

1、運用SAS對股票市場風險指標計算-CAL-FENGHAI-(2020YEAR-YICAI)INGBIAN上海師范大學標準試卷2015-2016學年第1學期考試日期2016年1月8日科目統(tǒng)計分析與軟件應用（學期論文）概率論與數(shù)理統(tǒng)計專業(yè)研究生15年級1班姓名李曉 學號152200647我承諾，遵守上海師范大學考場規(guī)則，誠信考試。 簽名：總分一分值一得分容 內(nèi)20nWn3BK 訂層確 姑昵正30HHn日 月 年運用SAS對股票市場風險指標計算 摘要：理論在現(xiàn)實市場中的有效性值得進一步探討，資本資產(chǎn)定價 模型是用來確定證券均衡價格的一種預測模型，模型以其簡潔的形 式和理論的淺顯易懂使它在整個經(jīng)濟學領

2、域得到了廣泛的應用，本 文運用SAS軟件實現(xiàn)CAPM模型在股市中的應用。關鍵詞：CAPM模型 風險指標SAS軟件一 計算指標與環(huán)境1）理論模型風險是投資者未來收益的一種不確定性。通常證券市場上由資產(chǎn)價格波動導致 的投資者收益的不確定性被人們稱為純市場風險，進行市場風險分析的基本模 型一資本資產(chǎn)定價模型CAPM為基礎。模型：其中，匚為股票j的超額收益；口為市場超額收益；勺和Q為參數(shù)，且假定0”,和£（不相關。將方差作為風險的度量，根據(jù)上述假設得到股票j的總風險為：即股票j的風險分為兩部分，0；尤和CT；。前者山市場引起的股票j風險的度 量，后者是與市場風險無關的股票j的非系統(tǒng)風險。根據(jù)

3、傳統(tǒng)的投資理論，系 統(tǒng)風險不能用優(yōu)化投資組合來消除，而非系統(tǒng)風險則是可以通過分散化投資組 合來消除。選定時期，根據(jù)經(jīng)驗數(shù)據(jù)可以得到模型的最小二乘估計色，幾以及相應估計 量玄，孟和可,。于是，系統(tǒng)風險占該股票總風險的比例估計值為：±化"）2序廠乂尸 R2 = jntnn為（乙"）2工0-力2有r-1i-l這實際上就是模型測定系數(shù)的估計值。1-斤打即為非系統(tǒng)風險所占總風險比例的估計。2）計算指標計算1999年至2005年，滬深兩地股票市場系統(tǒng)風險指數(shù)，個股總風險和系統(tǒng) 分風險占總風險比例三個風險指標。即具體計算：系統(tǒng)風險系數(shù)估計值個股總風險估計值系統(tǒng)風險占總風險比值斤

4、'；全市股票上述三種指標的概況統(tǒng)計量。3）計算環(huán)境計算數(shù)據(jù)集；銀行存款利率Banklr：基準利率Bchmklr;個股日收益DretM;市場日收益DretM；時期：2005樣本：滬深兩市場滿足條件的2006年前上市的所有股票日白分比收益。剔除1 年內(nèi)交易小于50天的股票。二計算程序運用SAS軟件對數(shù)據(jù)進行錄入和做相應的處理。1）算法實現(xiàn)笫一步：創(chuàng)建無風險利率數(shù)據(jù)集RF;2005年市場日收益數(shù)據(jù)；第二步：創(chuàng)建宏文本Stk2006.txt；第三步：計算2005年滬深兩市場A股個體風險指標；第四步：滬深兩市場個股與市場風險關系統(tǒng)計分析；2）計算程序創(chuàng)建無風險利率數(shù)據(jù)集：/*1998年7月1日后

5、使用回購利率兩周指數(shù)加權平均為基準利率*/data a;set resdet.bahnmii?;if code="B2W" and date二'ljunl998'd;rename ir=rf;keep ir date;run;/*1998年7月1日前用1年期銀行存款利率加10%為基準利率*/data b;set resdat.bankir;辻 code二"dly"run;data c;set b;format date yymmddlO;if enddt=then enddt=date（）;do date =begdt to enddt:

6、output;end;run;data d;set c;if date<, 1junl998, d;keep date rf;rf=ir*l. 1；/*在1年期存款利率的基礎上再增加10%*/run;/*合并得到基準利率表rfyr*/data rfyr;set d a;辻 date<=,31dec2005,d;run;/*得到日基利率表rf*/data rf;set rfyr;rf=rf/365;run;data DretM2005;set resdat.DretM;辻 year(date)=2005 and Exchflg= 0 and Mktflg=，AB* ;keep dat

7、e Dretmc;run;創(chuàng)建宏文本：Stk2006. txt利用選擇的樣本股票收益數(shù)據(jù)集Dret創(chuàng)建宏。如果要計算全部股票的風險指 標，可以直接利用lstkinfo創(chuàng)建宏。data a;set resdatdret;if dif(stkcd)=0 then delete;data null;set a;a=，%a ('C二')；file "stk2006.txt"put a $ stkcd $ b $ lstknm $ c $;run;計算2005年滬深兩市場個股風險指標：模型r_s=a+beta*r_m+e/*2005年無風險利率數(shù)據(jù)集rf2005*/d

8、ata rf2005;set rf:辻 year(date) =2005；run;/*2005市場超額收益數(shù)據(jù)集*/data pdretm2005 rf2005;merge dretm2005 rf 2005;by date;rm=dretmc-rf;keep date rm;run;ddtd pdretm2005;set pdretm2005;retain r_m;if rm=then r_m=rm;drop rm;run;data dret;set resdatdret;where year (date)=2005;run;proc sql;create table pdret2005 a

9、sselect * from dret left join rfon dretdate二rf.date;run;proc sort data=pdret2005;by stkcd date;run;data pdret2005;set pdret2005;r_s=dretrf;keep stkcd llstknm date r_s;run;proc sql;create able capm2005 asselect * from pdret2005 left join pdretm2005on pdret2005 date=pdretm2005 date;run;proc sort data=

10、capm2005;by stkcd;run;/*訃算個股風險指標；數(shù)據(jù)集capm2005*/proc reg data=capm2005 outset二d cp noprint; model r s=r m;by stkcd;run;data d;set d;辻（_edf_+_p_）50 then delete;data riiskl2005（keep=sn obs_rms_r_m_rsq_stkcd label二"2005 年個股與市 場風險指標“）； set d;sn=_n_;obs二（_edf_+）_）;label sn=,個股序號'label obs=觀測個數(shù)'

11、;label _rmse_=，個股風險度'；label r_m='系統(tǒng)風險估計值beta ;label _rsq_=，系統(tǒng)風險占總風險比例'；run;2005年股票市場個股風險指標的概括統(tǒng)計量計算： proc univariate data=riskl2005 nopprint; var r_m_rmse_rsq_;output out=out n=n_r_m n_rmse_ n_rsq_;mean=mean_r_m mean_rmse_ mean_rsq_median二median_r_m median_rmse_median_rsq_ min=min_r_m min_rmse_ min_rsq_ max二max_:r_ni max_rmse_ max_rsq_ ql=ql_r_m ql_rmse_ ql_rsq_ q3=q3_r_m q3_rmse_ q3_rsq_ range=range_r_m rang