powered by
alpha sets a new alpha for VaR and Expected Shortfall
alpha
alpha(model, alpha)
the portfolio.model to be changed
the value alpha (between 0 and 1)
the adapted portfolio.model
# NOT RUN { data(sp100w17av30s) model <- optimal.portfolio(scenario.set) cvar95 <- optimal.portfolio(objective(model, "expected.shortfall")) cvar90 <- optimal.portfolio(alpha(cvar95, 0.1)) # }
Run the code above in your browser using DataLab