library(copula)
persp(tawnT2Copula(),dCopula, zlim=c(0,10))
persp(surTawnT2Copula(),dCopula, zlim=c(0,10))
persp(r90TawnT2Copula(),dCopula, zlim=c(0,10))
persp(r270TawnT2Copula(),dCopula, zlim=c(0,10))
Run the code above in your browser using DataLab