# 1-param copulas
#BVN copula
cpar.bvn = tau2par("bvn", 0.5)
tau.bvn = par2tau("bvn", cpar.bvn)
#Frank copula
cpar.frk = tau2par("frk", 0.5)
tau.frk = par2tau("frk", cpar.frk)
#Gumbel copula
cpar.gum = tau2par("gum", 0.5)
tau.gum = par2tau("gum", cpar.gum)
#Joe copula
cpar.joe = tau2par("joe", 0.5)
tau.joe = par2tau("joe", cpar.joe)
# 2-param copulas
#BB1 copula
tau.bb1 = par2tau("bb1", c(0.5,1.5))
#BB7 copula
tau.bb7 = par2tau("bb7", c(1.5,1))
#BB8 copula
tau.bb8 = par2tau("bb8", c(3,0.8))
#BB10 copula
tau.bb10 = par2tau("bb10", c(3,0.8))
Run the code above in your browser using DataLab