R: Examples for 'nloptr::newuoa'

### ** Examples


fr <- function(x) {   ## Rosenbrock Banana function
    100 * (x[2] - x[1]^2)^2 + (1 - x[1])^2
}
(S <- newuoa(c(1, 2), fr))

$par
[1] 1 1

$value
[1] 0

$iter
[1] 33

$convergence
[1] 1

$message
[1] "NLOPT_SUCCESS: Generic success return value."

Examples for 'nloptr::newuoa'