Description Usage Arguments Value Examples
Executes nsteps
iterations of the HEGO method to an object of class
mkm
. At each step, a kriging model is reestimated (including
covariance parameters reestimation) based on the initial design points plus
the points visited during all previous iterations; then a new point is
obtained by maximizing the Expected Hypervolume Improvement criterion (EHVI).
1 2 3 4 5 6 7 8 9 10 
model 
An object of class 
fun 
The multiobjective and constraint cost function to be optimized.
This function must return a vector with the size of 
nsteps 
An integer representing the desired number of iterations, 
lower 
Vector of lower bounds for the variables to be optimized over
(default: 0 with length 
upper 
Vector of upper bounds for the variables to be optimized over
(default: 1 with length 
quiet 
Logical indicating the verbosity of the routine, 
control 
An optional list of control parameters, some of them passed to
the

optimcontrol 
Optional list of control parameters passed to the

updated mkm
model
1 2 3 4 5 6 7 8 9 10 11 12 13  # 
# The Nowacki Beam
# 
n < 20
d < 2
nsteps < 1 # value has been set to 1 to save compliation time, change this value to 40.
fun < nowacki_beam
doe < replicate(d,sample(0:n,n))/n
res < t(apply(doe, 1, fun))
model < mkm(doe, res, modelcontrol = list(objective = 1:2, lower = rep(0.1,d)))
model < HEGO(model, fun, nsteps, quiet = FALSE)
plot(nowacki_beam_tps$set)
points(ps(model@response[which(model@feasible),model@objective])$set, col = 'green', pch = 19)

Current iteration: 1 (elapsed 6.532 seconds)
Current design: 0.094 0.469
Current response: 1759.51 200.137 (unfeasible)
Warning messages:
1: In rgl.init(initValue, onlyNULL) : RGL: unable to open X11 display
2: 'rgl_init' failed, running with rgl.useNULL = TRUE
3: .onUnload failed in unloadNamespace() for 'rgl', details:
call: fun(...)
error: object 'rgl_quit' not found
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.