View source: R/simpA.measures.R
| measures_nonsimplifyingness_NP | R Documentation |
Compute a measure of non-simplifyingness based on non-parametric estimation of the conditional copula
measures_nonsimplifyingness_NP(
X1,
X2,
Z,
h,
measures = "all",
kernel.name = "Epanechnikov",
truncVal = NULL,
numericalInt = list(kind = "legendre", nGrid = 10),
verbose = 0
)
X1, X2 |
vector of |
Z |
vector of |
h |
the bandwidth used for kernel smoothing |
measures |
choices of measures of non-simplifyingness to be computed.
|
kernel.name |
the name of the kernel |
truncVal |
the value of truncation for the integral,
i.e. the integrals are computed from The default is |
numericalInt |
parameters to be given to
|
verbose |
option used for debugging. If |
a data.frame where each row corresponds to one measure of
non-simplifyingness and one choice of h.
As a particular case, if measures and h are both of length 1,
this data.frame will have only one row.
Derumigny, A. (2025). Measures of non-simplifyingness for conditional copulas and vines. ArXiv preprint, arXiv:2504.07704. \Sexpr[results=rd]{tools:::Rd_expr_doi("10.48550/arXiv.2504.07704")}
simpA.NP() for non-parametric tests of the simplifying
assumption.
set.seed(1)
N = 500
Z = rnorm(n = N, mean = 5, sd = 2)
conditionalTau = 0.8
simCopula = VineCopula::BiCopSim(N=N , family = 1,
par = VineCopula::BiCopTau2Par(1 , conditionalTau ))
X1 = qnorm(simCopula[,1], mean = Z)
X2 = qnorm(simCopula[,2], mean = - Z)
result <- measures_nonsimplifyingness_NP(
X1 = X1, X2 = X2, Z = Z, h = 0.08, measures = "tilde_T0_CvM")
result <- measures_nonsimplifyingness_NP(
X1 = X1, X2 = X2, Z = Z, h = 0.08, measures = "all")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.