Displaying 1 result from an estimated 1 matches for "gradientobs".
Did you mean:
  gradient's
  
2014 Oct 19
2
Checking if a matrix exists/is defined
...matrix exists. I have trouble with the first line below. In 
this case, matrix obj$hessian exists and is 74 x 74. I receive the 
error message:
Warning message:
In all(w$hessian) : coercing argument of type 'double' to logical
Thank you all.
---
if (!all(obj$hessian)|OPG){
   vb<-obj$gradientObs; vb<-solve(t(vb)%*%vb)
   vb.method<-"; v(b)=inv(G'G)"
} else {
   vb<- solve(-obj$hessian)
   vb.method<-"; v(b)=inv(-H)"
} 
	[[alternative HTML version deleted]]