## covarRisk -
# Covariance Risk
# Sigma = sqrt(W' COV W)
set.seed(4711)
data = assetsSim(100, 6)
covarRisk(data)
## mcr -
# Marginal contribution to Covariance Risk
# MCR = d Sigma / d W_i
mcr(data)
## mcrBeta -
# Marginal Beta
# beta = MCR / Sigma
mcrBeta(data)
## riskContributions -
# Marginal Risk Contributions
# RC = Sum_i ( W_i MCR )
riskContributions(data)
sum(riskContributions(data)) - covarRisk(data)
## riskBudgets -
# Marginal Risk Budgets
# RB = RC / Sigma
riskBudgets(data)
sum(riskBudgets(data))
Run the code above in your browser using DataLab