Историческое моделирование

Предположим, что инвестор из Великобритании вложила 30% своего состояния в индекс FTSE, 40% — в индекс S&P 500 и 30% — в индекс SMI.

Для различных векторов логарифмических доходностей по 5 факторам риска функция lossop() вычисляет убыток или прибыль инвестора при условии, что её совокупное состояние равно 1. Функцию также можно применить к пятимерному временному ряду логарифмических доходностей — в результате будет получен временной ряд исторически смоделированных убытков и прибылей, соответствующих каждому вектору доходностей.

Функция lossop() — это так называемый оператор потерь портфеля, специально написанный для данного упражнения. В общем случае для каждого нового портфеля необходимо создавать отдельную функцию для вычисления убытков и прибылей.

В этом упражнении вы сформируете исторически смоделированные убытки и исследуете их. Это необходимый шаг перед использованием этих данных для оценки VaR и ES.

Это упражнение является частью курса

Количественное управление рисками в R

Посмотреть курс

Инструкции к упражнению

Вычислите убыток, который возникнет при логарифмической доходности -0,1 по всем пяти факторам риска (это уже сделано за вас).
Создайте объект hslosses, применив lossop() к returns, а затем постройте график hslosses.
Постройте Q-Q график hslosses относительно нормального распределения.
Постройте выборочную ACF для hslosses, а затем для абсолютных значений из hslosses.

Интерактивное практическое упражнение

Попробуйте выполнить это упражнение, дополнив этот пример кода.

# Calculate the loss from a log-return of -0.1 for all risk factors
lossop(rep(-0.1, 5))

# Apply lossop() to returns and plot hslosses
___ <- lossop(___)


# Form a Q-Q plot of hslosses against normal


# Plot the sample acf of hslosses and their absolute values

Редактировать и запускать код