calculateMukv | R Documentation |
Computes mean universal kriging variance (MUKV) for given geostatistical parameters
calculateMukv(observations, predGrid, model, formulaString, fun, ...)
observations |
|
predGrid |
|
model |
Variogram model:object of class |
formulaString |
formula that defines the dependent variable as a linear model
of independent variables; suppose the dependent variable has name |
fun |
alternative penalty function, needs to be a function which can take the
same arguments as |
... |
other arguments to be passed on at lower level functions |
This function computes kriging on the predGrid
with
krige
function, and averages the kriging variance (MUKV). With covariates,
the function takes a universal kriging model into account.
MUKV value
S.J. Melles, O. Baume, J. Skoien
# load data:
library(gstat)
data(meuse)
coordinates(meuse) = ~x+y
data(meuse.grid)
coordinates(meuse.grid) = ~x+y
gridded(meuse.grid) = TRUE
meuse.grid$soil = factor(meuse.grid$soil)
# estimate variogram:
smplvarUK = variogram(zinc~dist+ffreq+soil, meuse)
plot(smplvarUK)
vfitUK = fit.variogram(variogram(zinc~dist+ffreq+soil, meuse), vgm(1, "Exp", 300, 1))
plot(smplvarUK, vfitUK)
calculateMukv(meuse, meuse.grid, vfitUK, zinc~dist+ffreq+soil)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.