Displaying 1 result from an estimated 1 matches for "sumgt".
Did you mean:
sum_t
2010 Feb 18
1
an error about " return some vectors from some functions within a function"
...'ck1' not found", in one of the iterations and stop. Since I am not experienced in programming, can anyone give me a suggestion to inspect this error?
The followings are the functions I created :
###################
# functions in the convg #
###################
check1 <- function(sumgt,beta1.0,gamma.0,sigma.0){
if (any(!is.finite(sumgt))){
count1 <- count1+1
return(c(count1,beta1.0,gamma.0,sigma.0))
}
else {return(c(NaN,NaN,NaN,NaN))}
}
check2 <- function(v0,maxit,iter,beta1.0,gamma.0,sigma.0){
if (is.nan(sum(v0))==TRUE | any(!is.finite(v0)) | max...