save.NoiseKriging {rlibkriging}

Save a NoiseKriging Model to a file storage

Description

Save a NoiseKriging Model to a file storage

Usage

## S3 method for class 'NoiseKriging'
save(object, filename, ...)

Arguments

object

An S3 NoiseKriging object.

filename

File name to save in.

...

Not used.

Value

The loaded NoiseKriging object.

Author(s)

Yann Richet [e-mail]

Examples

f <- function(x) 1- 1 / 2 * (sin(12 * x) / (1 + x) + 2 * cos(7 * x)*x^5 + 0.7)
set.seed(123)
X <- as.matrix(runif(10))
y <- f(X) + X/10 * rnorm(nrow(X))

k <- NoiseKriging(y, (X/10)^2, X, "matern3_2")
print(k)

outfile = tempfile("k.h5") 
save(k,outfile)