epoh 发表于 2011-12-22 20:27 
假若你是 13 个系数
Matrix 会不一样
而且也会依你的系数限制个数不同
> Rmat=rbind(c(rep(0,6),1,rep(0,6)),c(rep(0,7),1,rep(0,5)),c(rep(0,10),1,rep(0,2)),c(rep(0,11),1,0))
>
> Rmat = rbind(c(rep(0,6),1,rep(0,6)),c(rep(0,7),1,rep(0,5)),c(rep(0,10),1,rep(0,2)),c(rep(0,11),1,0))
> rvec = rbind(0,0,0,0)
> bhat = coef(rtn.bekk)
> avarRbhat = Rmat%*%vcov(rtn.bekk)%*%t(Rmat)
> wald.stat = t(Rmat%*%bhat-rvec)%*%solve(avarRbhat)%*%(Rmat%*%bhat-rvec)
> as.numeric(wald.stat)
[1] 172.4586
> p.wald = 1 - pchisq(wald.stat,4)
再帮我看一下吧,在这个程序里,WALD的原理是只需要估计无约束的,那么这个程序做出来的到底是哪些系数为零的呢?按道理来说波动溢出是要做三个假设检验,也就是三次WALD检验的。这个例子里做的是哪个呢?