Portefeuille d'actions international

Gestion des risques quantitatifs en R

Alexander McNeil

Instructor

Imaginez une ou un investisseur au Royaume‑Uni qui a réparti son avoir :
- 30 % FTSE, 40 % S&P 500, 30 % SMI
5 facteurs de risque : indices FTSE, S&P 500 et SMI, taux de change GBP/USD et GBP/CHF

riskfactors <- merge(FTSE, SP500, SMI, USD_GBP, CHF_GBP, all = FALSE)["/2012-12-31", ]

Affichage des facteurs de risque

plot.zoo(riskfactors)

Méthode simple, largement utilisée en finance
Rééchantillonner les rendements historiques des facteurs de risque et voir leur effet sur le portefeuille actuel
L'opérateur de perte montre l'effet de divers rendements des facteurs sur le portefeuille
Les fonctions d'opérateur de perte seront fournies dans les exercices

losses <- rnorm(100)
losses_o <- sort(losses, decreasing = TRUE)
head(losses_o, n = 8)

1.836163 1.775163 1.745427 1.614479 1.602120 1.590034 1.483691 1.408354

quantile(losses, 0.95)

     95% 
1.590638

qnorm(0.95)

1.644854

mean(losses[losses > quantile(losses, 0.95)])

1.714671

ESnorm(0.95)

2.062713

Gestion des risques quantitatifs en R