powered by
Evaluate synthetic cost function that is based on the number of waiting customers and the number elevators
getCosts(x, ...)
vector with sigma weight multiplier and ne number of elevators
sigma
ne
optional parameters passed to funSring
funSring
fitness (costs)
Note: To accelerate testing, nIterations was set to 1e3 (instead of 1e6)
# NOT RUN { set.seed(123) sigma = 1 ne = 10 x <- c(sigma, ne) getCosts(x) # }
Run the code above in your browser using DataLab