
http://www.ma-xy.com
1.4 模型估计与模型信息 第一章 证券收益率的 GARCH 族模型比较
1.4.2 程序
由于各个模型的建模基本相似,这里我们仅给出部分模型的程序。以 IGARCH 模型为例,
IGARCH 模型的建模程序如下
1 ############# rugarch package 介 绍##
2 #http : // unstarched . net/ r / rugarch/ 原 始 路 径
3 #http : // her bert12 . blog . 1 6 3 . com/ blog / s t a t i c /304782320120184118846/
4 #http : //www. b i o s t a t i s t i c . net /thread −78659−1−1.html 翻 译
5 . libPath s ( ”D: /Program Fi l e s /R/R− 3.1.3 / lib r a r y ” )
6 i n s t a l l . packages ( ” rugarch ” , l i b = ”D: /Program F i l e s /R/R− 3.1.3/ li b r a r y ” )
7 l i b r a r y ( p a r a l l e l )
8 #i n s t a l l . packages (”truncnorm ” , l i b = ”D: /Program F i l e s /R/R− 3.1.3 / li b r a r y ”)
9 i n s t a l l . packages ( ” misc3d” , l i b = ”D: /Program F i l e s /R/R− 3.1.3/ li b r a r y ” )
10 i n s t a l l . packages ( ” r g l ” , l i b = ”D: /Program F i l e s /R/R− 3.1.3/ l i b r a r y ” )
11 l i b r a r y ( rugarch )
12 #该 模 型 由 三 个 部 分 构 成 , 均 值 方 程 对 应 式 ( 1 ) , 分 布 假 设 对 应 ( 2 ) , 方 差 方 程 对 应 式 ( 3 ) ,
13 # 对 三 个 部 分 进 行 适 当 的 变 形 后 可 以 形 成
14 # egarch 模 型 , egarch−ged 模 型 , egarch−t 模 型, Igar ch 模 型 , garch−m模 型 和 Qgarch 模 型 等
15 # 因 此 , 设 定 模 型 形 式 就 是 分 别 设 定 均 值 方 程 、 方 差 方 程 和 分 布 。
16 # spec=ugarchspec ( variance . model = l i s t ( model = ”sGARCH” , garchOrder = c (1 , 1) ,
17 # submodel = NULL,
18 # ext e rna l . re g r e s s o r s = NULL,
19 # vari an ce . ta r g etin g = FALSE) ,
20 # mean . model = l i s t ( armaOrder = c (1 , 1) ,
21 # inc lud e .mean = TRUE,
22 # archm = FALSE,
23 # archpow = 1 ,
24 # arfima = FALSE,
25 # exte rnal . r e g r e s s o r s = NULL,
26 # archex = FALSE) ,
27 # d i s t r i b u t i o n . model = ”norm” )
28 # ug a r c hfit ( spec ,
29 # data ,
30 # out . sample = 0 ,
31 # s o lver = ” soln p ” ,
32 # s o lver . c ontr o l = l i s t () ,
33 # f i t . c o ntr o l = l i s t ( s t atio n a r i t y = 1 , f i x e d . se = 0 , s c a l e = 0 , rec . i n i t = ’ a l l
’ ) ,
34 # numderiv . c ont r ol = l i s t ( grad . eps=1e−4, grad . d=0.0001 ,
35 # grad . zero . tol = s qrt ( . Machine$ double . eps /7e−7) ,
36 # h es s . eps = 1e−4,
37 # h es s . d = 0 . 1 ,
38 # h es s . zero . to l = s q rt ( . Machine$double . eps /7e−7) ,
39 # r =4, v=2) )
40 # 通 过 p lot ( myfit ) 可 以 对 模 型 结 果 进 行 图 形 诊 断 :
41 # pl ot ( myfit ) # Make a plo t s e l e c t i o n ( or 0 to e x i t ) : 1: S e r i e s with 2 Conditio nal SD
42 ###################exapmle f o r rugarch package
43 variance . model <− l i s t ( model = ”eGARCH” , garchOrder = c ( 2 , 3) )
44 # # model Valid models ( cur r entl y implemented ) a re “sGARCH” , “fGARCH” , “eGARCH” , “
gjrGARCH” , “apARCH” and “iGARCH” and “csGARCH” .
45 # # garchOrder The ARCH (q) and GARCH (p ) ord ers .
46 # # submodel I f the model i s “fGARCH” , vali d submodels are “GARCH” , “TGARCH” , “
http://www.ma-xy.com 18 http://www.ma-xy.com