# Computes VaR given P/L
data <- runif(5, min = 0, max = .2)
NormalES(returns = data, cl = .95, hp = 90)
# Computes VaR given mean and standard deviation of P/L data
NormalES(mu = .012, sigma = .03, cl = .95, hp = 90)
Run the code above in your browser using DataLab