powered by
first.local.minimum(x)
x
v<-rnorm(30) out<-first.local.minimum(v)
Run the code above in your browser using DataLab