powered by
risk.req(x, M = 10^6, T = 1, alpha = c(0.05), beta = 1, p = 2)
## computes capital requirement for a position of U$ 1,000 on SP500 for five days data(returns) s <- returns[, 2] risk.req(s, 1000, 5, c(0.01, 0.05))
Run the code above in your browser using DataLab