powered by
bgpd
bgpdSetSeed(x)
gpd
method = "simulate"
# mod <- gpd(rnorm(1000), qu=.7, method="simulate") # bgpdSetSeed(mod)
Run the code above in your browser using DataLab