Displaying 1 result from an estimated 1 matches for "nllfun2g".
2000 Sep 26
2
bounds violations, infinite loops in optim/L-BFGS-B (PR#671)
...oth nlm() and optim() going to
be around indefinitely? Should I be using one or the other?
For the moment I've managed to (sort of) get around the problem
with try(), but the infinite loops are a real nuisance ...
cfunc2_function(input,N1,N2,G=1.0){
pmin(1,1/((1+((input - N1)/N2))^G))
}
nllfun2g.boot_function(q,debug=FALSE){
# if (i==93) debug <- TRUE
N1_q[1]
N2_q[2]
G_q[3]
L_cfunc2(boot.total,N1,N2,G)
if (debug) cat(c(N1,N2,G,range(L)),"\n")
r <- -sum(dbinom(boot.pred, boot.total, L, log=TRUE))
if (!is.finite(r)) {
cat(c(N1,N2,G,range(L)),"\n")...