ref_crit: Refinement criteria

Description Usage Arguments Value Examples

View source: R/ref_crit.R

Description

Compute the refienemnt criteria for a set of points of the design space

Usage

1
ref_crit(x, model, alpha = 0.001)

Arguments

x

points of the design space in which the criterion will be computed

model

the surrogate model

alpha

the value of the distance criteria default alpha = 0.001

Value

the value of the criterion

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
#' library(UP)
d            <- 2;
n            <- 16
X    	      <- expand.grid(x1=s <- seq(0,1, length=5), x2=s)
Xtest	      <- expand.grid(x1=seq(0,1,length=5), x2=seq(0,1,length=4))
Y            <- apply(X, 1, branin)
sm= krigingsm$new()
sm$setDOE(X,Y)
sm$train() 
ref_crit <- ref_crit(x= t(Xtest), model=sm,alpha=0) 
print(max(ref_crit))

malekbs/UP documentation built on May 14, 2019, 8:05 a.m.