# NOT RUN {
data = VineCopula::BiCopSim(N = 50, family = 1, par = 0.3)
result = BiCopConfIntMMD(x1 = data[,1], x2 = data[,2], family = 1,
nResampling = 2, subsamplingSize = 10, niter = 10)
# }
# NOT RUN {
data_ = VineCopula::BiCopSim(N = 1000, family = 1, par = 0.3)
result_ = BiCopConfIntMMD(x1 = data_[,1], x2 = data_[,2], family = 1)
result_$CI.Tau
result_$CI.Par
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab