# simulate from a bivariate t-copula
simdata = BiCopSim(300,2,-0.7,par2=4)
# second derivative of the conditional bivariate t-copula
# with respect to the first parameter
u1 = simdata[,1]
u2 = simdata[,2]
BiCopHfuncDeriv2(u1,u2,2,-0.7,par2=4, deriv="par")
Run the code above in your browser using DataLab