Mean Square Error MSE

MSE is designed to easily compute MSE on design points

MSE

Format

An R6Class generator object

Details

Compute MSE of a surrogate model

Methods

MSE$new()

Creates a new MSE

get_val(surrogate_model)

It evaluates the MSE for a surrogate_model (object sm).

Examples

library(UP)
d            <- 2
X                   <- expand.grid(x1=seq(0,1,length=5), x2=seq(0,1,length=4))
y                 <- apply(X, 1, branin)
upsm              <- UPSM$new(sm= krigingsm$new(), UP=UPClass$new(X,y,Scale =TRUE))
mse          <- MSE$new()
valmse       <- mse$get_val(upsm)
print("MSE")
#> [1] "MSE"
print(valmse)
#> [1] 2.701434e-23