| EllCopLikelihood {ElliptCopulas} | R Documentation | 
Computation of the likelihood of an elliptical copula
Description
Computes the likelihood
\frac{g(Q_g(U) \Sigma^{-1} Q_g(U))}{f_g(Q_g(U_1)) \cdots f_g(Q_g(U_d))}
for a vector (U_1, \dots, U_d) on the unit cube
and for a d-dimensional generator g whose univariate density and quantile functions
are respectively f_g and Q_g.
This is to the likelihood of the copula associated with the elliptical distribution
having density |det(\Sigma)|^{-1/2} g(x \Sigma^{-1} x).
Usage
EllCopLikelihood(grid, g_d, pointsToCompute, Sigma_m1, log = TRUE)
Arguments
| grid | the discretization grid on which the generator is given. | 
| g_d | the values of the  | 
| pointsToCompute | the points  | 
| Sigma_m1 | the inverse correlation matrix of the elliptical distribution. | 
| log | if  | 
Value
a vector (of length 1 if pointsToCompute is a vector) of likelihoods
associated with each observation.
References
Derumigny, A., & Fermanian, J. D. (2022). Identifiability and estimation of meta-elliptical copula generators. Journal of Multivariate Analysis, article 104962. doi:10.1016/j.jmva.2022.104962.
See Also
EllCopEst for the estimation of elliptical copula,
EllCopEst for the estimation of elliptical copula.
Examples
grid = seq(0,50,by = 0.01)
gdnorm = DensityGenerator.normalize(grid = grid, grid_g = exp(-grid/2), d = 3)
gdnorm2 = DensityGenerator.normalize(grid = grid, grid_g = 1/(1+grid^2), d = 3)
X = EllCopSim(n = 30, d = 3, grid = grid, g_d = gdnorm)
logLik = EllCopLikelihood(grid , g_d = gdnorm , X,
                          Sigma_m1 = diag(3), log = TRUE)
logLik2 = EllCopLikelihood(grid , g_d = gdnorm2 , X,
                           Sigma_m1 = diag(3), log = TRUE)
print(c(sum(logLik), sum(logLik2)))