as.km.NuggetKriging: Coerce a 'NuggetKriging' object into the '"km"' class of the...

In rlibkriging: Kriging Models using the 'libKriging' Library

Coerce a NuggetKriging object into the "km" class of the DiceKriging package.

Description

Coerce a NuggetKriging object into the "km" class of the DiceKriging package.

Usage

## S3 method for class 'NuggetKriging'
as.km(x, .call = NULL, ...)

Arguments

x	An object with S3 class "NuggetKriging".
.call	Force the call slot to be filled in the returned km object.
...	Not used.

Value

An object of having the S4 class "KM" which extends the "km" class of the DiceKriging package and contains an extra NuggetKriging slot.

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) + 0.1 * rnorm(nrow(X))

k <- NuggetKriging(y, X, "matern3_2")
print(k)

k_km <- as.km(k)
print(k_km)

rlibkriging documentation built on Oct. 3, 2024, 1:06 a.m.