12.07.2015 Views

"Frontmatter". In: Analysis of Financial Time Series

"Frontmatter". In: Analysis of Financial Time Series

"Frontmatter". In: Analysis of Financial Time Series

SHOW MORE
SHOW LESS

You also want an ePaper? Increase the reach of your titles

YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.

THE PCD MODEL 217smpl 2 3534compute a0 = 0.2, a1 = 0.1, b1 = 0.1, al = 0.8maximize(method=bhhh,recursive,iterations=150) glnset fv = gvar(t)set resid = x(t)/fv(t)set residsq = resid(t)*resid(t)cor(qstats,number=20,span=10) residcor(qstats,number=20,span=10) residsqB. Program for Estimating a GACD(1, 1) Modelsall 0 3534:1open data ibm1to5.datdata(org=obs) / x r1set psi = 1.0nonlin a0 a1 b1 al kafrml cv = a0+a1*x(t-1)+b1*psi(t-1)frml gma = %LNGAMMA(ka)frml lam = exp(gma(t))/exp(%LNGAMMA(ka+(1.0/al)))frml xlam = x(t)/(lam(t)*(psi(t)=cv(t)))frml gln =-gma(t)+log(al/x(t))+ka*al*log(xlam(t))-(xlam(t))**alsmpl 2 3534compute a0 = 0.238, a1 = 0.075, b1 = 0.857, al = 0.5, ka = 4.0nlpar(criterion=value,cvcrit=0.00001)maximize(method=bhhh,recursive,iterations=150) glnset fv = cv(t)set resid = x(t)/fv(t)set residsq = resid(t)*resid(t)cor(qstats,number=20,span=10) residcor(qstats,number=20,span=10) residsqC. A program for estimating a Tar-WACD(1, 1) model. The threshold 3.79 isprespecified.all 0 3534:1open data ibm1to5.datdata(org=obs) / x rtset psi = 1.0nonlin a1 a2 al b0 b2 blfrml u = ((x(t-1)-3.79)/abs(x(t-1)-3.79)+1.0)/2.0frml cp1 = a1*x(t-1)+a2*psi(t-1)frml gma1 = %LNGAMMA(1.0+1.0/al)frml cp2 = b0+b2*psi(t-1)frml gma2 = %LNGAMMA(1.0+1.0/bl)frml cp = cp1(t)*(1-u(t))+cp2(t)*u(t)frml gln1 =al*gma1(t)+log(al)-log(x(t)) $+al*log(x(t)/(psi(t)=cp(t)))-(exp(gma1(t))*x(t)/psi(t))**alfrml gln2 =bl*gma2(t)+log(bl)-log(x(t)) $+bl*log(x(t)/(psi(t)=cp(t)))-(exp(gma2(t))*x(t)/psi(t))**blfrml gln = gln1(t)*(1-u(t))+gln2(t)*u(t)smpl 2 3534compute a1 = 0.2, a2 = 0.85, al = 0.9

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!