covfx: Return covariance as a function of distance
In emanuelhuber/GauProMod: Gaussian Process Modelling

Description Usage Arguments Examples

View source: R/main.R

Return covariance as a function of distance

1	covfx(r, covModel)

`r`	vector of distance
`covModel`	Covariance mdoel

covModel <- list(kernel="matern",
                 l = 5,     # correlation length
                 v = 1,     # smoothness
                 h = 2.45   # std. deviation
)
r <- seq(0, 20, by = 0.1)
myCov <- covfx(r = r, covModel = covModel)
plot(r, myCov, type = "l", ylim = c(0, max(myCov)),
     ylab = "covariance", xlab = "distance", xaxs = "i", yaxs = "i")