Optmization algorithm based on fmincon
ci_optimizer(x)
x
A Dataframe
A data frame
x <- data.frame(rnorm(20),rnorm(20),rnorm(20),rnorm(20)) ci_optimizer(x)