powered by
3-dim Gaussian Test Function
funGauss(x)
matrix of points to evaluate with the function. Rows for points and columns for dimension.
1-column matrix with resulting function values
Unpublished
# NOT RUN { x1 <- matrix(c(1,1,1),1,) funGauss(x1) res1 <- spot(,funGauss, c(-0.001,-0.007,-0.003), c(0.5,1.0,1.1), control=list(funEvals=15)) plotModel(res1$model, which = 1:2) # }
Run the code above in your browser using DataLab