vcov {soilhypfit} | R Documentation |
vcov
Method for Class fit_wrc_hcc
Description
This page documents the method vcov
for the class
fit_wrc_hcc
and its coef
method. vcov
extracts the
covariance matrices of the nonlinear parameters
\widehat{\boldsymbol{\nu}}
estimated by
maximum likelihood or maximum posterior density.
Usage
## S3 method for class 'fit_wrc_hcc'
vcov(object, subset = NULL, grad_eps,
bound_eps = sqrt(.Machine$double.eps), ...)
## S3 method for class 'vcov_fit_wrc_hcc'
coef(object, se = TRUE, correlation = se,
status = FALSE, ...)
Arguments
object |
either an object of class |
subset |
an integer, character or logical vector to the choose the
soil samples for which covariance matrices should be extracted.
Defaults to |
grad_eps |
a numeric scalar defining a critical magnitude of the moduli of scaled gradient components so that they are considered to be approximately equal to zero, see Details. |
bound_eps |
a numeric scalar defining the critical difference between parameter estimates and the boundaries of the parameter space so that the estimates are considered to be identical to the boundary values, see Details. |
se |
a logical scalar to control whether standard errors of the
estimated nonlinear parameters
|
correlation |
a logical scalar to control whether correlations
( |
status |
a logical scalar to control whether diagnostics should be returned along with the results. |
... |
additional arguments passed to methods, currently not used. |
Details
The function vcov
extracts (co-)variances of the nonlinear
parameters from the inverse Hessian matrix of the objective function at
the solution \widehat{\boldsymbol{\nu}}
for
mpd and ml estimates, see soilhypfitIntro
and Stewart
and Sørensen (1981).
vcov
checks whether the gradient at the solution is approximately
equal to zero and issues a warning if this is not the case. This is
controlled by the argument grad_eps
which is the tolerable largest
modulus of the scaled gradient (= gradient divided by the absolute value
of objective function) at the solution. The function
control_fit_wrc_hcc
selects a default value for
grad_eps
in the dependence of the chosen optimisation approach
(argument settings
of control_fit_wrc_hcc
).
vcov
sets covariances equal to NA
if the parameter
estimates differ less than bound_eps
from the boundaries of the
parameter space as defined by param_boundf
.
Value
The method vcov
returns an object of of class
vcov_fit_wrc_hcc
, which is a list of covariance matrices of the
estimated nonlinear parameters for the soil samples. The attribute
status
of the matrices qualifies the covariances.
The coef
method for class vcov_fit_wrc_hcc
extracts the
entries of the covariances matrices, optionally computes standard errors
and correlation coefficients and returns the results in a dataframe.
Author(s)
Andreas Papritz papritz@retired.ethz.ch.
References
Stewart, W.E. and Sørensen, J.P. (1981)
Bayesian estimation of common
parameters from multiresponse data with missing observations.
Technometrics, 23, 131–141,
doi:10.1080/00401706.1981.10486255.
See Also
soilhypfitIntro
for a description of the models and a brief
summary of the parameter estimation approach;
fit_wrc_hcc
for (constrained) estimation of parameters of
models for soil water retention and hydraulic conductivity data;
control_fit_wrc_hcc
for options to control
fit_wrc_hcc
;
soilhypfitmethods
for common S3 methods for class
fit_wrc_hcc
;
prfloglik_sample
for profile loglikelihood
computations;
wc_model
and hc_model
for currently
implemented models for soil water retention curves and hydraulic
conductivity functions;
evaporative-length
for physically constraining parameter
estimates of soil hydraulic material functions.
Examples
# use of \donttest{} because execution time exceeds 5 seconds
data(sim_wrc_hcc)
# define number of cores for parallel computations
if(interactive()) ncpu <- parallel::detectCores() - 1L else ncpu <- 1L
# estimate parameters for 3 samples by unconstrained, global optimisation
# algorithm NLOPT_GN_MLSL
# sample 1: use only conductivity data
# sample 2: use only water content data
# sample 3: use both types of data
rfit_uglob <- fit_wrc_hcc(
wrc_formula = wc ~ head | id,
hcc_formula = hc ~ head | id,
wrc_subset = id != 1,
hcc_subset = id != 2,
data = sim_wrc_hcc,
control = control_fit_wrc_hcc(pcmp = control_pcmp(ncores = ncpu)))
print(rfit_uglob)
summary(rfit_uglob)
coef(rfit_uglob, what = "nonlinear")
coef(rfit_uglob, what = "linear", gof = TRUE)
coef(vcov(rfit_uglob), status = TRUE, se = FALSE)
op <- par(mfrow = c(3, 2))
plot(rfit_uglob)
on.exit(par(op))