# Computes ES assuming generalised Pareto for following parameters
Ra <- 5 * rnorm(100)
mu <- 1
beta <- 1.2
zeta1 <- 1.6
zeta2 <- 2.2
GParetoMultipleMEFPlot(Ra, mu, beta, zeta1, zeta2)
Run the code above in your browser using DataLab