Displaying 1 result from an estimated 1 matches for "lowbnd".
Did you mean:
lowband
2017 Aug 06
1
Help with optim function in R, please?
...f (is.finite(ll)) {
? ????return(ll)
??? } else {
????? if (is.na(ll)) {
??????? message(par)
????? }
????? message(ll)
?? ???return(-3^305)
??? }
? }
?
??
??
??xy <- optim(par=c(2,0.5,0.2,0.2),fn=optim_1,method="L-BFGS-B",control = list(maxit= 200, trace=1),lower= c(copula[[1]]@param.lowbnd, copula[[2]]@param.lowbnd,0,0), upper = c(copula[[1]]@param.upbnd, copula[[2]]@param.upbnd,1,1))
?
??return(xy$par)
}
Any help please?
Regards,
Fadhah
[[alternative HTML version deleted]]