powered by
goldsectmin(f, a, b, tol = 0.001, m = 100) goldsectmax(f, a, b, tol = 0.001, m = 100)
x
a
b
tol
m
bisection
gradient
hillclimbing
newton
sa
secant
f <- function(x) { x^2 - 3 * x + 3 } goldsectmin(f, 0, 5)
Run the code above in your browser using DataLab