RVineMatrix
object which encodes an R-vine copula model.
It contains the matrix identifying the R-vine tree structure, the matrix identifying the copula families
utilized and two matrices for corresponding parameter values.RVineMatrix(Matrix, family = array(0, dim = dim(Matrix)),
par = array(NA, dim = dim(Matrix)),
par2 = array(NA, dim = dim(Matrix)), names=NULL)
Matrix
(default: family = array(0,dim=dim(Matrix))
).
The bivariate copula Matrix
(default: par = array(NA, dim = dim(Matrix))
).Matrix
(default: par2 = array(NA, dim = dim(Ma
names = NULL
.RVineMatrix
object with the following matrix components:RVineMatrixCheck
, RVineMLE
, RVineSim
, C2RVine
, D2RVine
# define 5-dimensional R-vine tree structure matrix
Matrix <- c(5, 2, 3, 1, 4,
0, 2, 3, 4, 1,
0, 0, 3, 4, 1,
0, 0, 0, 4, 1,
0, 0, 0, 0, 1)
Matrix <- matrix(Matrix, 5, 5)
# define R-vine pair-copula family matrix
family <- c(0, 1, 3, 4, 4,
0, 0, 3, 4, 1,
0, 0, 0, 4, 1,
0, 0, 0, 0, 3,
0, 0, 0, 0, 0)
family <- matrix(family, 5, 5)
# define R-vine pair-copula parameter matrix
par <- c(0, 0.2, 0.9, 1.5, 3.9,
0, 0, 1.1, 1.6, 0.9,
0, 0, 0, 1.9, 0.5,
0, 0, 0, 0, 4.8,
0, 0, 0, 0, 0)
par <- matrix(par, 5, 5)
# define second R-vine pair-copula parameter matrix
par2 <- matrix(0, 5, 5)
# define RVineMatrix object
RVM <- RVineMatrix(Matrix = Matrix, family = family,
par = par, par2 = par2,
names = c("V1", "V2", "V3", "V4", "V5"))
# Print detailed information
print(RVM, detail = TRUE)
Run the code above in your browser using DataLab