Entradas

Mostrando entradas de diciembre, 2019

Valor en Riesgo (VaR) en R (4): basados en un proceso ARMA-GARCH

Imagen
En la siguiente entrada se muestra la estimación del Valor en Riesgo (VaR,Value at Risk) para los precios de un determinado índice financiero, para esto se utiliza el método delta-normal y VaR condicional combinando la estrategia ARIMA con la GARCH. Se utiliza la data EuStockMarkets disponible en R, tal como se muestra en los siguientes codigos:
library(rugarch) library(ggfortify) library(ggplot2) library(ggthemes) library(forecast) library(tseries) library(gridExtra)
DAX <- EuStockMarkets[,"DAX"] returnx <- diff(log(DAX))*100
# _________________________________________________________
p1 = qplot(x = 1:length(returnx) , y = returnx , geom = 'line') + geom_line(color = 'darkblue') + geom_hline(yintercept = mean(returnx) , color = 'red' , size = 1) + labs(x = '' , y = 'Daily Returns')
p2 = qplot(returnx , geom = 'density') + coord_flip() + geom_vline(xintercept = mean(returnx) , color = 'red' , size = 1) + geom_density(fill = &#…