Last chance! 50% off unlimited learning
Sale ends in
nesdepth(x)
"nacopula"
.1
.
dim
of nacopulas.
F2 <- onacopula("F", C(1.9, 1, C(4.5, c(2,3))))
F2
F3 <- onacopula("Clayton", C(1.5, 3:1,
C(2.5, 4:5,
C(15, 9:6))))
nesdepth(F2) # 2
nesdepth(F3) # 3
Run the code above in your browser using DataLab