GWO {metaheuristicOpt} | R Documentation |
Optimization using Grey Wolf Optimizer
Description
This is the internal function that implements Grey Wolf Optimizer
Algorithm. It is used to solve continuous optimization tasks.
Users do not need to call it directly,
but just use metaOpt
.
Usage
GWO(FUN, optimType = "MIN", numVar, numPopulation = 40,
maxIter = 500, rangeVar)
Arguments
FUN |
an objective function or cost function, |
optimType |
a string value that represent the type of optimization.
There are two option for this arguments: |
numVar |
a positive integer to determine the number variables. |
numPopulation |
a positive integer to determine the number populations. The default value is 40. |
maxIter |
a positive integer to determine the maximum number of iterations. The default value is 500. |
rangeVar |
a matrix ( |
Details
This algorithm was proposed by (Mirjalili, 2014), inspired by the behaviour of grey wolf (Canis lupus). The GWO algorithm mimics the leadership hierarchy and hunting mechanism of grey wolves in nature. Four types of grey wolves such as alpha, beta, delta, and omega are employed for simulating the leadership hierarchy. In addition, the three main steps of hunting, searching for prey, encircling prey, and attacking prey, are implemented.
In order to find the optimal solution, the algorithm follow the following steps.
Initialization: Initialize the first population of grey wolf randomly, calculate their fitness and find the best wolf as alpha, second best as beta and third best as delta. The rest of wolf assumed as omega.
Update Wolf Position: The position of the wolf is updated depending on the position of three wolfes (alpha, betha and delta).
Replace the alpha, betha or delta if new position of wolf have better fitness.
Check termination criteria, if termination criterion is satisfied, return the alpha as the optimal solution for given problem. Otherwise, back to Update Wolf Position steps.
Value
Vector [v1, v2, ..., vn]
where n
is number variable
and vn
is value of n-th
variable.
References
Seyedali Mirjalili, Seyed Mohammad Mirjalili, Andrew Lewis, Grey Wolf Optimizer, Advances in Engineering Software, Volume 69, 2014, Pages 46-61, ISSN 0965-9978, https://doi.org/10.1016/j.advengsoft.2013.12.007
See Also
Examples
##################################
## Optimizing the step function
# define step function as objective function
step <- function(x){
result <- sum(abs((x+0.5))^2)
return(result)
}
## Define parameter
numVar <- 5
rangeVar <- matrix(c(-100,100), nrow=2)
## calculate the optimum solution using grey wolf optimizer
resultGWO <- GWO(step, optimType="MIN", numVar, numPopulation=20,
maxIter=100, rangeVar)
## calculate the optimum value using step function
optimum.value <- step(resultGWO)