Instalación desde GIT-HUB.
devtools::install_github("Abraham1011/EEEA",
auth_token = "****************************")
Ejemplo: Función Rastrigin
Optimización con EEEA
library(EEEA)
fun = function(x){
value = sum(x^2 - 10*cos(2*pi*x) + 10)
return(value)
}
d <- 2 #Dimemnsión
n <- 10 * d #NĆŗmero de individuos
k0 <- 5
k <- 1
tolerance <- 0.01
lower <- rep(-10,d)
upper <- rep(10,d)
maxiter <- 150
resultado <- EDA.hist(fun, lower = lower,
upper = upper,n = n,
k = k, k0 = k0, tolerance = tolerance,
maxiter = maxiter)
resultado$sol
## V1 V2
## 20 0.002287436 0.006437111
EDA.plot(resultado)

Exploración explicita
d <- 2 #Dimemnsión
n <- 10 * d #NĆŗmero de individuos
k <- 10
tolerance <- 0.01
lower <- rep(-10,d)
upper <- rep(10,d)
maxiter <- 150
res <- ExplicitExploration(fun = fun, lower = lower, upper = upper,
n = n, k = k, tolerance = tolerance,
maxiter)
res$par
## [,1] [,2]
## [1,] 0.001603384 -0.01149049
## [2,] 0.062321099 0.89365532
## [3,] 0.957389055 1.91934433
## [4,] -1.899285824 0.85016083
## [5,] -0.964809330 -3.03201484
## [6,] 1.816197275 -0.10672452
## [7,] 1.785034090 -0.07916139
## [8,] 2.868310851 1.01022526
## [9,] -2.974736090 -1.97034657
## [10,] -0.726450123 -0.08174165
## [11,] -0.733027770 1.07007000
## [12,] 3.024092466 -2.09580123
## [13,] -2.046973091 3.08555590
## [14,] -1.240121741 -1.92137256
## [15,] -0.033666785 4.00396199
## [16,] -0.340122171 -0.97536630
## [17,] -1.094165687 2.81664465
## [18,] 2.239324949 0.90403370
## [19,] 0.089542577 -0.64815775
## [20,] -1.248227870 -0.80201170