## The optim algorithm:
algo1 <- algoObj("optim")
## The nlminb algorithm:
algo2 <- algoObj("nlminb")
## Defining the algorithm lbfgs from the nloptr package
if (FALSE) {
algo3 <- algoObj(algo="lbfgs", start="x0", fct="fn",
grad="gr", solution="par", value="value",
message="message", convergence="convergence")
}
Run the code above in your browser using DataLab