
Last chance! 50% off unlimited learning
Sale ends in
# generate ordered random sample from GPD
set.seed(1977)
n <- 20
gam <- -0.75
x <- rgpd(n, gam)
## generate dlc object
est <- logConDens(x, smoothed = FALSE, print = FALSE, gam = NULL, xs = NULL)
# compute tail index estimators
pickands(est)
Run the code above in your browser using DataLab