phihac | R Documentation |
This function computes the \Phi
-dependence between all the child copulas of a hac object obtained by the function gethac
, i.e.,
given a q
-dimensional random vector \mathbf{X} = (\mathbf{X}_{1},...,\mathbf{X}_{k})
with \mathbf{X}_{i}
a d_{i}
-dimensional random vector, i.e., q = d_{1} + ... + d_{k}
,
where \mathbf{X}_{1},...,\mathbf{X}_{k}
are connected via a hierarchical Archimedean copula with two nesting levels, phihac computes the \Phi
-dependence
between \mathbf{X}_{1},...,\mathbf{X}_{k}
.
phihac(cop, dim, M, phi)
cop |
A hac object as provided by the function |
dim |
The vector of dimensions |
M |
The size of the Monte Carlo sample used for approximating the integral of the |
phi |
The function |
When \mathbf{X}
has copula density c
with marginal copula densities c_{i}
of \mathbf{X}_{i}
for i = 1, \dots, k
,
the \Phi
-dependence between \mathbf{X}_{1}, \dots, \mathbf{X}_{k}
equals
\mathcal{D}_{\Phi} \left (\mathbf{X}_{1}, \dots, \mathbf{X}_{k} \right ) = \int_{[0,1]^{q}} \prod_{i = 1}^{k} c_{i}(\mathbf{u}_{i}) \Phi \left (\frac{c(\mathbf{u})}{\prod_{i = 1}^{k}c_{i}(\mathbf{u}_{i})} \right ),
for a certain continuous, convex function \Phi : (0,\infty) \rightarrow \mathbb{R}
.
By drawing a sample of size M
from c
, say \mathbf{U}^{(1)}, \dots, \mathbf{U}^{(M)}
, with \mathbf{U}^{(\ell)} = (\mathbf{U}_{1}^{(\ell)}, \dots, \mathbf{U}_{k}^{(\ell)})
, we can approximate \mathcal{D}_{\Phi}
by
\widehat{\mathcal{D}}_{\Phi} = \frac{1}{M} \sum_{\ell = 1}^{M} \frac{\prod_{i = 1}^{k} c_{i} \left (\mathbf{U}_{i}^{(\ell)} \right )}{c \left (\mathbf{U}^{(\ell)} \right )} \Phi \left (\frac{c \left (\mathbf{U}^{(\ell)} \right )}{\prod_{i = 1}^{k} c_{i} \left (\mathbf{U}_{i}^{(\ell)} \right )} \right ).
The function phihac
computes \widehat{\mathcal{D}}_{\Phi}
when c
is a hierarchical Archimedean copula with two nesting levels,
as produced by the function gethac
.
The \Phi
-dependence between \mathbf{X}_{1}, \dots, \mathbf{X}_{k}
(i.e., between all the child copulas of the hac object).
De Keyser, S. & Gijbels, I. (2024).
Parametric dependence between random vectors via copula-based divergence measures.
Journal of Multivariate Analysis 203:105336.
doi: https://doi.org/10.1016/j.jmva.2024.105336.
gethac
for creating a hac object with two nesting levels,
Helhac
for computing the Hellinger distance between all the child copulas of a hac object with two nesting levels,
mlehac
for maximum pseudo-likelihood estimation of the parameters of a hac object with two nesting levels.
dim = c(2,2)
thetas = c(2,3,4)
# 4 dimensional nested Gumbel copula with (theta_0,theta_1,theta_2) = (2,3,4)
HAC = gethac(dim,thetas,type = 1)
# Mutual information based on Monte Carlo sample of size 10000
Phi_dep = phihac(HAC,dim,10000,function(t){t * log(t)})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.