kmPredictWrapper: Wrapper for the Kriging model prediction
In fanovaGraph: Building Kriging Models from FANOVA Graphs

Description Usage Arguments Value Author(s) See Also Examples

Wrapper for the Kriging model prediction function predict.km from package DiceKriging to simplify the use of Kriging prediction functions as arguments for functions like estimateGraph or fast99.

1	kmPredictWrapper(newdata, km.object)

`newdata`	a vector, matrix or data frame containing the points where to perform predictions
`km.object`	an object of class `km`

kriging mean computed at newdata

J. Fruth, O. Roustant

estimateGraph

### graph estimation of a kriging prediction of the ishigami function
set.seed(1)
x <- matrix(runif(150,-pi,pi),100,3)
y <- ishigami.fun(x)
KM <- km(~1, design = data.frame(x), response = y)

g <- estimateGraph(f.mat = kmPredictWrapper, d = 3, n.tot = 10000, q.arg = 
  list(min = -pi, max = pi), method = "LiuOwen", km.object = KM) 
print(g$tii)