# NOT RUN {
set.seed(12)
dat <- evd::rbvevd(n=1000, dep = 0.1)
lambdadep(dat, method = "hill")
# }
# NOT RUN {
lambdadep(dat, method = "bayes")
lambdadep(dat, method = "mle")
dat <- matrix(runif(n = 2000), ncol = 2)
lambdadep(dat, method = "hill")
# }
Run the code above in your browser using DataLab