Adapter for UP surface

A surrogate model ready to be used in a UP framework

upsurface(x, y, rs, upcontrol = NULL)

Arguments

x	design input
y	design output
rs	the surrogate model
upcontrol	list of resampling technique default NULL

Value

A surrogate model ready to be used in a UP framework

Examples

library(UP)
d            <- 2
X            <- expand.grid(x1=s <- seq(0,1, length=5), x2=s)
testdata     <- expand.grid(x1=s <- seq(0,1, length=10), x2=s)
Y            <- apply(X, 1, branin)
upsm         <- upsurface(x=X, y=Y, rs= krigingsm$new())
predictions  <- upsm$uppredict(testdata)