6 Procesos No Estacionarios
6.1 Definición y formas de No Estacionariedad
Hasta ahora hemos planteado una serie de técnicas de regresión que aplican sólo a procesos o series estacionarias. En esta sección relajaremos la definición de estacionariedad y plantearemos pruebas para determinar cuando una serie es estacionaria bajo tres diferentes especificiones:
Estacionariedad al rededor de una tendencia determinística;
Estacionariedad al rededor de una media, y
Estacionariedad al rededor del cero.
A continuación discutiremos cómo es posible que una serie sea estacionaria al rededor de una tendencia determinística. Diremos que una tendencia es determinística si ésta puede ser aproximada o modelada por un polinomio en función de \(t\), la cual incluye posibles transformaciones logarítmicas.
Bajo este enfoque, el proceso está lejos de cumplir con la defición de estacionariedad que hemos establecido en capítulos previos, pero relajaremos el supuesto y reconoceremos que una serie puede ser estacionaria en varianza bajo una tendencia determinística. Así, diremos que la serie será descrita por una ecuación dada por: \[\begin{equation} Y_t = \sum^m_{j = 0} \delta_j t^j + X_t \tag{6.1} \end{equation}\]
Donde \(X_t\) es un proceso \(ARMA(p, q)\) con media cero, que se puede ver como: \[\begin{equation} \alpha(L) X_t = \beta(L) U_t \end{equation}\]
Entonces, los momentos y variaza de la ecuación (6.1) estaran dados por: \[\begin{equation} \mathbb{E}[Y_t] = \sum^m_{j = 0} \delta_j t^j = \mu_t \tag{6.2} \end{equation}\]
Dada la ecuación (6.2) podemos plantear la siguiente ecuación de covarainzas: \[\begin{eqnarray} \mathbb{E}[(Y_t - \mu_t) \cdot (Y_{t+\tau} - \mu_{t+\tau})] & = & \mathbb{E}[X_t \cdot X_{t+\tau}] \nonumber \\ & = & \gamma_X(\tau) \tag{6.3} \end{eqnarray}\]
Utilizando el resultado de la ecuación (6.3) podemos establecer que: \[\begin{equation} \mathbb{E}[(Y_t - \mu_t)^2] = \mathbb{E}[X_t^2] = \sigma_X^2 \tag{6.4} \end{equation}\]
Así, las ecuaciones (6.2) y (6.4) significan que el proceso descrito por la ecuación (6.1) es estacionario pero en varianza. De esta forma a partir de este momento diremos que una serie será estacionaria al rededor de una tendencia determinística si cumple con las condiciones establecidas en las ecuaciones (6.1), (6.2) y (6.4).
Dicho lo anterior estudiaremos el concepto de raíz unitaria de un proceso estocástico o de una serie de tiempo. Partamos de platear que un proceso AR(1) tiene raíz unitaria cuando el cual el coeficiente \(a_1 = 1\), es decir: \[\begin{equation} Y_t = Y_{t-1} + U_t \tag{6.5} \end{equation}\]
Donde \(U_t\) es un proceso pueramente aleatorio con media cero, varianza constante y autocovarianza cero (0), al cual nos referiremos simplemente como ruido blanco. Supongamos ahora que incluímos un término constante en la ecuación (6.5), de forma que tenemos: \[\begin{equation} Y_t = \delta + Y_{t-1} + U_t \tag{6.6} \end{equation}\]
Tomando a la ecuación (6.6) y suponiendo que existe un valor inicial \(Y_0\) de la serie podemos plantear la sguiente secuencia de expresiones: \[\begin{eqnarray*} Y_1 & = & \delta + Y_0 + U_1 \\ Y_2 & = & \delta + Y_1 + U_2 \\ & = & \delta + (\delta + Y_0 + U_1) + U_2 \\ & = & 2 \times \delta + Y_0 + U_1 + U_2 \end{eqnarray*}\]
Si repitieramos la sustitución sucesiva anterior hasta el momento \(t\) encontrariamos que la ecuación de la solución general que describe a un \(AR(1)\) con término constante que tiene raíz unitaria es de la forma: \[\begin{equation} Y_t = t \delta + Y_0 + \sum_{i=1}^t U_i \tag{6.7} \end{equation}\]
La ecuación (6.7) es equivalente a la ecuación (6.1). A la ecuación (6.7) también se le conoce como proceso con Drift o con término constante, indistintamente, ya que el componente de Drift suele asociarse a la posibilidad de incorporar el efecto de los residuales pasados, lo cual es posible simplemente agregando una constante.s
Si revisamos el comportamiento de sus momentos y varianza de la ecuación (6.7) encontramos que: \[\begin{eqnarray*} \mathbb{E}[Y_t] & = & Y_0 + \delta t = \mu_t \\ Var[Y_t] & = & t \sigma^2 = \gamma(0, t) \\ Cov(Y_t, Y_{t+\tau}) & = & (t - \tau) \sigma^2 = \gamma(t, \tau) \end{eqnarray*}\]
De esta forma, la ecuación (6.7) no describe un proceso estacionario, sólo podría ser estacionario si \(t = 1\), en cualquier otro caso sería no estacionario en varianza. Ahora hagamos un resumen y acordemos notación que se utilizará en esta sección. Supongamos un proceso o serie de tiempo que es decrito por la siguiente ecuación: \[\begin{equation} Y_t = \delta + Y_{t-1} + X_t \tag{6.8} \end{equation}\]
Donde \(X_t\) es un \(ARMA(p, q)\) con media cero. Si definimos a \(\Delta Y_t = Y_t - Y_{t-1}\), entonces la ecuación (6.8) la podemos escribir como: \[\begin{equation} \Delta Y_t = \delta + X_t \tag{6.9} \end{equation}\]
A la ecuación (6.9) la denominaremos como un proceso estacionario en diferencias o simplemente como un proceso integrado. Así utilizaremos la siguiente definición.
Sea un proceso estocástico \(Y\), decimos que este es integrado de orden \(d\), \(I(d)\), si este puede transformarse a uno estacionacionario, que sea invertible, mediante la diferenciación del mismo \(d\)-veces, es decir: \[\begin{equation} (1 - L)^d Y_t = \delta + X_t \tag{6.10} \end{equation}\]
Donde \(X_t\) es un proceso \(ARMA(p, q)\). De lo cual se infiere que en la ecuación (6.10) \(Y_t\) será una \(ARIMA(p, d, q)\), el cual contiene \(d\) raíces unitarias. A estos procesos también se les conoce como procesos con tendencia estocástica.
Dada la discusión annterior, a continuación platearemos un resumen de cuales son los dos casos a los cuales nos referiremos como procesos que no son estacionarios en media, pero que si lo son en varianza. Estos casos son: \[\begin{eqnarray} Y_t & = & Y_0 + \delta t + U_t \\ Y_t & = & Y_0 + \delta + \sum_{i = 1}^t U_t \end{eqnarray}\]
Ambos casos no son estacionarios en media, pero si lo son en varianza. De ambos podemos decir que los choques o innovaciones del término de error tienen un efecto transitorio en el primero, pero permanentes en el segundo.
6.2 Pruebas de Raíces Unitarias
En esta sección plantearemos una serie de pruebas estadísticas para determinar cuando una serie puede ser estacionaria bajo tres posibles casos:
Estacionariedad al rededor de una tendencia determinística;
Estacionariedad al rededor de una media, y
Estacionariedad al rededor del cero.
6.3 Dickey - Fuller (DF)
Partamos de una forma del proceso \(Y_t\) dada por: \[\begin{equation} Y_t = \sum_{j = 0}^m \delta_j t^j + X_t \tag{6.11} \end{equation}\]
Donde \(X_t\) es un \(ARMA(p, q)\) con media cero. Esta prueba asume que \(m = 1\), por lo que utilizaremos un modelo del tipo: \[\begin{equation} Y_t = \alpha + \delta t + \rho Y_{t-1} + U_t \tag{6.12} \end{equation}\]
Si, el \(AR(1)\) planteado tiene raíz unitaria, es decir, \(\rho = 1\), entonces tendríamos: \[\begin{eqnarray*} Y_t & = & \alpha + \delta t + Y_{t-1} + U_t \\ \Delta Y_t & = & \alpha + \delta t + U_t \end{eqnarray*}\]
De esta forma, para determinar si una serie tiene raíz unitaria basta con probar la hipótesis nula de que \(H_0 : \rho = 1\), junto con las diferentes combinaciones que impliquen restricciones respecto a \(\delta\) y \(\alpha\).
En resumen, la prueba DF consiste en asumir un modelo general dado por la ecuación (6.12) y probar tres especificaciones distintas que serían válidas bajo \(H_0 : \rho = 1\):
Modelo A: con intercepto y tendencia: \[\begin{equation*} \Delta Y_t = \alpha + \delta t + \beta Y_{t-1} + U_t \end{equation*}\] Buscamos probar si \(H_0 : \beta = \rho - 1 = 0\) contra \(H_a : \beta < 0\), por lo que es una prueba de una cola. Otra forma de decirlo, es probamos si el proceso tiene raíz unitaria contra si el proceso es estacionario al rededor de una tendencia determinística.
Modelo B: con intercepto: \[\begin{equation*} \Delta Y_t = \alpha + \beta Y_{t-1} + U_t \end{equation*}\] Buscamos probar si \(H_0 : \beta = \rho - 1 = 0\) contra \(H_a : \beta < 0\), por lo que es una prueba de una cola. Otra forma de decirlo, es probamos si el proceso tiene raíz unitaria contra si el proceso es estacionario al rededor de una constante.
Modelo C: sin intercepto y tendencia: \[\begin{equation*} \Delta Y_t = \beta Y_{t-1} + U_t \end{equation*}\] Buscamos probar si \(H_0 : \beta = \rho - 1 = 0\) contra \(H_a : \beta < 0\), por lo que es una prueba de una cola. Otra forma de decirlo, es probamos si el proceso tiene raíz unitaria contra si el proceso es estacionario sin considerar una constante o una tendencia determinística, es decir, es un proceso puramente aleatorio.
6.3.1 Dickey - Fuller Aumentada (ADF)
A diferencia de un modelo AR(1) para el caso de una prueba DF como en la ecuación (6.12), en una prueba ADF se asume que el proceso es un AR(p) de la forma (por simplicidad hemos omitido el término constante y el término de tendencia determinística): \[\begin{equation} Y_t = a_1 Y_{t-1} + a_2 Y_{t-2} + \ldots + a_p Y_{t-p} + U_t \tag{6.13} \end{equation}\]
Haciendo una sustitución de términos similar a las que hemos planteado en otras secciones podemos reexpresar la ecuación (6.13) en su versión en diferencias siguiendo el proceso: \[\begin{equation} Y_t = \rho Y_{t-1} + \theta_1 \Delta Y_{t-1} + \theta_2 \Delta Y_{t-2} + \ldots + + \theta_{p-1} \Delta Y_{t-p+1} + U_t \end{equation}\]
Donde \(\rho = \theta_0 = \sum_{j = 1}^p a_j\), \(\theta_i = - \sum_{j = i + 1}^p a_j\), \(i = 1, 2, \ldots, p-1\). Así, si el proceso AR(p) tiene raíz unitaria entonces ceremos que: \[\begin{eqnarray*} 1 - a_1 - a_2 - \ldots - a_p & = & 0 \\ \rho & = & 1 \end{eqnarray*}\]
De donde podemos establecer que el modelo general de una prueba ADF será: \[\begin{equation} \Delta Y_{t-1} = \alpha + \beta t + (\rho - 1) Y_{t-1} + \theta_1 \Delta Y_{t-1} + \theta_2 \Delta Y_{t-2} + \ldots + \theta_k \Delta Y_{t-k} + U_t \end{equation}\]
Donde \(U_t\) es un proceso puramente aleatorio y \(k\) es elegido de tal manera que los residuales sean un proceso puramente aleatorio. En resumen, la prueba DF consiste en asumir un modelo general dado por la ecuación (6.13), que incluya constante y tendencia, y probar tres especificaciones distintas que serían válidas bajo \(H_0 : \rho = 1\):
Modelo A: con intercepto y tendencia: \[\begin{equation*} \Delta Y_t = \alpha + \delta t + \beta Y_{t-1} + \theta_1 \Delta Y_{t-1} + \theta_2 \Delta Y_{t-2} + \ldots + \theta_{p-1} \Delta Y_{t-p+1} + U_t \end{equation*}\] Buscamos probar si \(H_0 : \beta = \rho - 1 = 0\) contra \(H_a : \beta < 0\), por lo que es una prueba de una cola. Otra forma de decirlo, es probamos si el proceso tiene raíz unitaria contra si el proceso es estacionario al rededor de una tendencia determinística.
Modelo B: con intercepto: \[\begin{equation*} \Delta Y_t = \alpha + \beta Y_{t-1} + \theta_1 \Delta Y_{t-1} + \theta_2 \Delta Y_{t-2} + \ldots + \theta_{p-1} \Delta Y_{t-p+1} + U_t \end{equation*}\] Buscamos probar si \(H_0 : \beta = \rho - 1 = 0\) contra \(H_a : \beta < 0\), por lo que es una prueba de una cola. Otra forma de decirlo, es probamos si el proceso tiene raíz unitaria contra si el proceso es estacionario al rededor de una constante.
Modelo C: sin intercepto y tendencia: \[\begin{equation*} \Delta Y_t = \beta Y_{t-1} + \theta_1 \Delta Y_{t-1} + \theta_2 \Delta Y_{t-2} + \ldots + \theta_{p-1} \Delta Y_{t-p+1} + U_t \end{equation*}\] Buscamos probar si \(H_0 : \beta = \rho - 1 = 0\) contra \(H_a : \beta < 0\), por lo que es una prueba de una cola. Otra forma de decirlo, es probamos si el proceso tiene raíz unitaria contra si el proceso es estacionario sin considerar una constante o una tendencia determinística, es decir, es un proceso puramente aleatorio.
6.3.2 Phillips - Perron (PP)
Una tercera prueba es la de PP, la cual también está basada en una AR(1) dado por la ecuación: \[\begin{equation} Y_t = d \eta + \rho Y_{t-1} + U_t \tag{6.14} \end{equation}\]
Donde \(d\) incluye a cualquiera de los componentes determinísticos como constante y tendencia. Al igual que los casos pasados, la hipótesis a probar era \(H_0 : \rho = 1\) contra la alternativa \(H_a : | \rho | < 1\), y asumimos una estructura MA(q) es el término de error de la forma \(U_t = \psi(L) \varepsilon_t = \psi_0 \varepsilon_t + \psi_1 \varepsilon_{t-1} + \ldots + \psi_p \varepsilon_{t-p}\), con \(\varepsilon_t\) es un ruido blanco con media cero y varianza \(\sigma^2\). En este modelo se elige el valor \(p\) que hace que el componente sea un MA(p). Las tablas estadísticas de PP para esta prueba pueden utilizar una estadística \(Z_\tau\) o \(Z_\rho\), las cuales se pueden emplear indistintamente.
En resumen, la prueba PP consiste en asumir un modelo general dado por la ecuación (6.14) y probar dos especificaciones distintas que serían válidas bajo \(H_0 : \rho = 1\), ambas considerando un compenente Drift:
Modelo A: con intercepto y tendencia: \[\begin{equation*} Y_t = \alpha + \delta t + \rho Y_{t-1} + U_t \end{equation*}\] Buscamos probar si \(H_0 : \rho = 1\) contra \(H_a : | \rho | < 1\), por lo que es una prueba de una cola. Otra forma de decirlo, es probamos si el proceso tiene raíz unitaria contra si el proceso es estacionario al rededor de una tendencia determinística.
Modelo B: con intercepto: \[\begin{equation*} Y_t = \alpha + \rho Y_{t-1} + U_t \end{equation*}\] Buscamos probar si \(H_0 : \rho = 1\) contra \(H_a : | \rho | < 1\), por lo que es una prueba de una cola. Otra forma de decirlo, es probamos si el proceso tiene raíz unitaria contra si el proceso es estacionario al rededor de una constante.
6.3.3 Kwiatkowsky - Phillips - Schmidt - Shin (KPSS)
La prueba KPSS considera que el proceso es estacionario bajo la hipótesis nula, lo cual hace una diferencia respecto de las anteriores pruebas. El modelo considerado es: \[\begin{equation} Y_t = \delta t + \xi_t + U_t \end{equation}\]
Donde \(U_t\) es un proceso estacionario y \(\xi_t\) es un ruido blanco descrito por la forma: \(\xi_t = \xi_{t-1} + \varepsilon_t\), donde \(\varepsilon_t\) es un proceso normalmente distribuido con media cero y varianza \(\sigma^2_\varepsilon\).
Así, bajo la hipótesis nula \(H_0 : \sigma^2_\varepsilon = 0\), \(\xi\) se vuelve una constante y el proceso puede tener una tendencia estacionaria. Dado el planteamiento de la prueba, los valores críticos al 95% son:
0.146, para un modelo con tendencia
0.463, para un modelo con constante
6.3.4 Ejemplo con aplicación de todas las pruebas de raíces unitarias
A continuación, mostraremos como ejemplo la aplicación de las pruebas de raíces unitarias a la serie de Tipo de Cambio en forma logaritmica y de diferencias logaritmicas. Asumamos que determinamos el valor de los rezagos de la prueba con el criterio de \(p = int\{ 4 (T/100)^{1/4} \}\). En la práctica, existen otras formas de determinar el valor de \(p\), como el criterio de AIC, pero es decisión del investigador cual usar.
library(ggplot2)
library(dplyr)
library(stats)
library(MASS)
library(strucchange)
library(zoo)
library(sandwich)
library(urca)
library(lmtest)
library(vars)
#
load("BD/Datos_Ad.RData")
#
## Conversion a series de tiempo:
Datos <- ts(Datos_Ad[7: 11],
start = c(2000, 1),
freq = 12)
LDatos <- log(Datos)
DLDatos <- diff(log(Datos, base = exp(1)),
lag = 1,
differences = 1)
DaLDatos <- diff(log(Datos, base = exp(1)),
lag = 12,
differences = 1)
plot(LDatos,
plot.type = "m", nc = 2,
col = c("darkgreen", "darkblue", "darkred", "orange", "purple"),
main = "Series en Logaritmos",
xlab = "Tiempo")

Figure 6.1: Series en Logaritmos
plot(DLDatos,
plot.type = "m", nc = 2,
col = c("darkgreen", "darkblue", "darkred", "orange", "purple"),
main = "Series en Diferencias Logaritmicas",
xlab = "Tiempo")

Figure 6.2: Series en Diferencias Logaritmicas
plot(DaLDatos,
plot.type = "m", nc = 2,
col = c("darkgreen", "darkblue", "darkred", "orange", "purple"),
main = "Series en Diferencias Anuales Logaritmicas",
xlab = "Tiempo")

Figure 6.3: Series en Diferencias Anuales Logaritmicas
plot(cbind(DLDatos, DaLDatos),
plot.type = "m", nc = 2,
col = c("darkgreen", "darkblue", "darkred", "orange", "purple"),
main = "Comparacion de Series en Diferencias",
xlab = "Tiempo")

Figure 6.4: Comparacion de Series en Diferencias Anuales
plot(cbind(LDatos, DLDatos),
plot.type = "m", nc = 2,
col = c("darkgreen", "darkblue", "darkred", "orange", "purple"),
main = "Comparacion de Series en Diferencias",
xlab = "Tiempo")

Figure 6.5: Comparacion de Series en Diferencias
En los siguientes mostramos los resultados de aplicar las pruebas de raíces unitarias a la serie \(LTC_t\), considerando \(p = int \{ 4 (234/100)^{(1/4)} \} = 4\) para aquellas pruebas que requieren de rezagos: ADF, PP y KPSS.
##
## ###############################################
## # Augmented Dickey-Fuller Test Unit Root Test #
## ###############################################
##
## Test regression trend
##
##
## Call:
## lm(formula = z.diff ~ z.lag.1 + 1 + tt)
##
## Residuals:
## Min 1Q Median 3Q Max
## -0.083973 -0.015415 -0.002526 0.009332 0.170645
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 0.08700923 0.04029878 2.159 0.0317 *
## z.lag.1 -0.03844435 0.01852595 -2.075 0.0389 *
## tt 0.00011203 0.00006246 1.794 0.0740 .
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 0.02705 on 278 degrees of freedom
## Multiple R-squared: 0.01629, Adjusted R-squared: 0.00921
## F-statistic: 2.301 on 2 and 278 DF, p-value: 0.102
##
##
## Value of test-statistic is: -2.0752 2.1124 2.3013
##
## Critical values for test statistics:
## 1pct 5pct 10pct
## tau3 -3.98 -3.42 -3.13
## phi2 6.15 4.71 4.05
## phi3 8.34 6.30 5.36
##
## ###############################################
## # Augmented Dickey-Fuller Test Unit Root Test #
## ###############################################
##
## Test regression drift
##
##
## Call:
## lm(formula = z.diff ~ z.lag.1 + 1)
##
## Residuals:
## Min 1Q Median 3Q Max
## -0.089442 -0.014571 -0.002497 0.009620 0.171964
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 0.020316 0.015600 1.302 0.194
## z.lag.1 -0.006946 0.005925 -1.172 0.242
##
## Residual standard error: 0.02716 on 279 degrees of freedom
## Multiple R-squared: 0.004903, Adjusted R-squared: 0.001336
## F-statistic: 1.375 on 1 and 279 DF, p-value: 0.242
##
##
## Value of test-statistic is: -1.1724 1.5477
##
## Critical values for test statistics:
## 1pct 5pct 10pct
## tau2 -3.44 -2.87 -2.57
## phi1 6.47 4.61 3.79
##
## ###############################################
## # Augmented Dickey-Fuller Test Unit Root Test #
## ###############################################
##
## Test regression none
##
##
## Call:
## lm(formula = z.diff ~ z.lag.1 - 1)
##
## Residuals:
## Min 1Q Median 3Q Max
## -0.089736 -0.014701 -0.003293 0.010359 0.169748
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## z.lag.1 0.0007280 0.0006161 1.181 0.238
##
## Residual standard error: 0.0272 on 280 degrees of freedom
## Multiple R-squared: 0.004961, Adjusted R-squared: 0.001407
## F-statistic: 1.396 on 1 and 280 DF, p-value: 0.2384
##
##
## Value of test-statistic is: 1.1815
##
## Critical values for test statistics:
## 1pct 5pct 10pct
## tau1 -2.58 -1.95 -1.62
##
## ###############################################
## # Augmented Dickey-Fuller Test Unit Root Test #
## ###############################################
##
## Test regression trend
##
##
## Call:
## lm(formula = z.diff ~ z.lag.1 + 1 + tt)
##
## Residuals:
## Min 1Q Median 3Q Max
## -0.09095 -0.01306 -0.00158 0.01055 0.17069
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 0.002881589 0.003163345 0.911 0.363
## z.lag.1 -0.736373275 0.058071315 -12.680 <0.0000000000000002 ***
## tt -0.000009351 0.000019483 -0.480 0.632
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 0.02634 on 277 degrees of freedom
## Multiple R-squared: 0.3673, Adjusted R-squared: 0.3628
## F-statistic: 80.41 on 2 and 277 DF, p-value: < 0.00000000000000022
##
##
## Value of test-statistic is: -12.6805 53.6071 80.4095
##
## Critical values for test statistics:
## 1pct 5pct 10pct
## tau3 -3.98 -3.42 -3.13
## phi2 6.15 4.71 4.05
## phi3 8.34 6.30 5.36
##
## ###############################################
## # Augmented Dickey-Fuller Test Unit Root Test #
## ###############################################
##
## Test regression drift
##
##
## Call:
## lm(formula = z.diff ~ z.lag.1 + 1)
##
## Residuals:
## Min 1Q Median 3Q Max
## -0.090664 -0.013492 -0.001331 0.010702 0.169754
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 0.001566 0.001577 0.993 0.322
## z.lag.1 -0.735658 0.057972 -12.690 <0.0000000000000002 ***
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 0.02631 on 278 degrees of freedom
## Multiple R-squared: 0.3668, Adjusted R-squared: 0.3645
## F-statistic: 161 on 1 and 278 DF, p-value: < 0.00000000000000022
##
##
## Value of test-statistic is: -12.6899 80.5185
##
## Critical values for test statistics:
## 1pct 5pct 10pct
## tau2 -3.44 -2.87 -2.57
## phi1 6.47 4.61 3.79
##
## ###############################################
## # Augmented Dickey-Fuller Test Unit Root Test #
## ###############################################
##
## Test regression none
##
##
## Call:
## lm(formula = z.diff ~ z.lag.1 - 1)
##
## Residuals:
## Min 1Q Median 3Q Max
## -0.089121 -0.011916 0.000311 0.012192 0.171310
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## z.lag.1 -0.73093 0.05777 -12.65 <0.0000000000000002 ***
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 0.02631 on 279 degrees of freedom
## Multiple R-squared: 0.3646, Adjusted R-squared: 0.3623
## F-statistic: 160.1 on 1 and 279 DF, p-value: < 0.00000000000000022
##
##
## Value of test-statistic is: -12.6515
##
## Critical values for test statistics:
## 1pct 5pct 10pct
## tau1 -2.58 -1.95 -1.62
## Augmented Dickey - Fuller
### NIVELES: Tipo de cambio
summary(ur.df(LDatos[, 2], type = "trend", lags = 5))
##
## ###############################################
## # Augmented Dickey-Fuller Test Unit Root Test #
## ###############################################
##
## Test regression trend
##
##
## Call:
## lm(formula = z.diff ~ z.lag.1 + 1 + tt + z.diff.lag)
##
## Residuals:
## Min 1Q Median 3Q Max
## -0.077054 -0.014133 -0.002281 0.011551 0.167611
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 0.10899655 0.04255838 2.561 0.0110 *
## z.lag.1 -0.04919274 0.01969939 -2.497 0.0131 *
## tt 0.00015118 0.00006679 2.263 0.0244 *
## z.diff.lag1 0.32887766 0.06112000 5.381 0.000000162 ***
## z.diff.lag2 -0.12845492 0.06432008 -1.997 0.0468 *
## z.diff.lag3 -0.01064885 0.06462312 -0.165 0.8692
## z.diff.lag4 0.05690285 0.06350714 0.896 0.3711
## z.diff.lag5 -0.01668349 0.06151762 -0.271 0.7864
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 0.02597 on 268 degrees of freedom
## Multiple R-squared: 0.1196, Adjusted R-squared: 0.09662
## F-statistic: 5.202 on 7 and 268 DF, p-value: 0.00001414
##
##
## Value of test-statistic is: -2.4972 2.5862 3.2058
##
## Critical values for test statistics:
## 1pct 5pct 10pct
## tau3 -3.98 -3.42 -3.13
## phi2 6.15 4.71 4.05
## phi3 8.34 6.30 5.36
##
## ###############################################
## # Augmented Dickey-Fuller Test Unit Root Test #
## ###############################################
##
## Test regression drift
##
##
## Call:
## lm(formula = z.diff ~ z.lag.1 + 1 + z.diff.lag)
##
## Residuals:
## Min 1Q Median 3Q Max
## -0.081102 -0.013688 -0.002598 0.011536 0.167963
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 0.019078 0.015382 1.240 0.2160
## z.lag.1 -0.006575 0.005837 -1.126 0.2610
## z.diff.lag1 0.306455 0.060772 5.043 0.000000845 ***
## z.diff.lag2 -0.156749 0.063575 -2.466 0.0143 *
## z.diff.lag3 -0.034594 0.064238 -0.539 0.5907
## z.diff.lag4 0.038455 0.063463 0.606 0.5451
## z.diff.lag5 -0.041998 0.060954 -0.689 0.4914
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 0.02617 on 269 degrees of freedom
## Multiple R-squared: 0.1028, Adjusted R-squared: 0.08277
## F-statistic: 5.136 on 6 and 269 DF, p-value: 0.00005131
##
##
## Value of test-statistic is: -1.1265 1.2978
##
## Critical values for test statistics:
## 1pct 5pct 10pct
## tau2 -3.44 -2.87 -2.57
## phi1 6.47 4.61 3.79
##
## ###############################################
## # Augmented Dickey-Fuller Test Unit Root Test #
## ###############################################
##
## Test regression none
##
##
## Call:
## lm(formula = z.diff ~ z.lag.1 - 1 + z.diff.lag)
##
## Residuals:
## Min 1Q Median 3Q Max
## -0.080975 -0.014773 -0.002006 0.011681 0.165789
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## z.lag.1 0.0006247 0.0006081 1.027 0.3052
## z.diff.lag1 0.3052416 0.0608250 5.018 0.000000947 ***
## z.diff.lag2 -0.1599301 0.0635869 -2.515 0.0125 *
## z.diff.lag3 -0.0366726 0.0642802 -0.571 0.5688
## z.diff.lag4 0.0367316 0.0635108 0.578 0.5635
## z.diff.lag5 -0.0449750 0.0609677 -0.738 0.4613
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 0.0262 on 270 degrees of freedom
## Multiple R-squared: 0.1027, Adjusted R-squared: 0.08271
## F-statistic: 5.148 on 6 and 270 DF, p-value: 0.00004979
##
##
## Value of test-statistic is: 1.0273
##
## Critical values for test statistics:
## 1pct 5pct 10pct
## tau1 -2.58 -1.95 -1.62
##
## ###############################################
## # Augmented Dickey-Fuller Test Unit Root Test #
## ###############################################
##
## Test regression trend
##
##
## Call:
## lm(formula = z.diff ~ z.lag.1 + 1 + tt + z.diff.lag)
##
## Residuals:
## Min 1Q Median 3Q Max
## -0.069846 -0.013941 -0.001969 0.011796 0.166553
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 0.00398042 0.00326372 1.220 0.2237
## z.lag.1 -0.96600985 0.13032157 -7.413 0.00000000000164 ***
## tt -0.00001242 0.00001981 -0.627 0.5310
## z.diff.lag1 0.27428705 0.11800103 2.324 0.0209 *
## z.diff.lag2 0.11502927 0.10628825 1.082 0.2801
## z.diff.lag3 0.07837533 0.09095430 0.862 0.3896
## z.diff.lag4 0.09775877 0.07423509 1.317 0.1890
## z.diff.lag5 0.07280186 0.06082666 1.197 0.2324
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 0.02605 on 267 degrees of freedom
## Multiple R-squared: 0.3901, Adjusted R-squared: 0.3741
## F-statistic: 24.39 on 7 and 267 DF, p-value: < 0.00000000000000022
##
##
## Value of test-statistic is: -7.4125 18.3632 27.5402
##
## Critical values for test statistics:
## 1pct 5pct 10pct
## tau3 -3.98 -3.42 -3.13
## phi2 6.15 4.71 4.05
## phi3 8.34 6.30 5.36
##
## ###############################################
## # Augmented Dickey-Fuller Test Unit Root Test #
## ###############################################
##
## Test regression drift
##
##
## Call:
## lm(formula = z.diff ~ z.lag.1 + 1 + z.diff.lag)
##
## Residuals:
## Min 1Q Median 3Q Max
## -0.070858 -0.014250 -0.001793 0.011998 0.165361
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 0.002197 0.001601 1.372 0.1711
## z.lag.1 -0.963143 0.130094 -7.403 0.00000000000172 ***
## z.diff.lag1 0.272137 0.117818 2.310 0.0217 *
## z.diff.lag2 0.113463 0.106139 1.069 0.2860
## z.diff.lag3 0.077366 0.090837 0.852 0.3951
## z.diff.lag4 0.097369 0.074148 1.313 0.1903
## z.diff.lag5 0.072725 0.060758 1.197 0.2324
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 0.02602 on 268 degrees of freedom
## Multiple R-squared: 0.3892, Adjusted R-squared: 0.3755
## F-statistic: 28.46 on 6 and 268 DF, p-value: < 0.00000000000000022
##
##
## Value of test-statistic is: -7.4034 27.41
##
## Critical values for test statistics:
## 1pct 5pct 10pct
## tau2 -3.44 -2.87 -2.57
## phi1 6.47 4.61 3.79
##
## ###############################################
## # Augmented Dickey-Fuller Test Unit Root Test #
## ###############################################
##
## Test regression none
##
##
## Call:
## lm(formula = z.diff ~ z.lag.1 - 1 + z.diff.lag)
##
## Residuals:
## Min 1Q Median 3Q Max
## -0.069424 -0.012002 0.000317 0.013820 0.167787
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## z.lag.1 -0.92780 0.12773 -7.264 0.00000000000407 ***
## z.diff.lag1 0.24302 0.11608 2.094 0.0372 *
## z.diff.lag2 0.08889 0.10479 0.848 0.3970
## z.diff.lag3 0.05875 0.08997 0.653 0.5143
## z.diff.lag4 0.08492 0.07371 1.152 0.2503
## z.diff.lag5 0.06500 0.06060 1.073 0.2844
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 0.02607 on 269 degrees of freedom
## Multiple R-squared: 0.3849, Adjusted R-squared: 0.3712
## F-statistic: 28.05 on 6 and 269 DF, p-value: < 0.00000000000000022
##
##
## Value of test-statistic is: -7.2639
##
## Critical values for test statistics:
## 1pct 5pct 10pct
## tau1 -2.58 -1.95 -1.62
## PP: Phillips - Perron Test
### NIVELES: Tipo de cambio
summary(ur.pp(LDatos[, 2], type = "Z-tau", model = "trend", use.lag = 5))
##
## ##################################
## # Phillips-Perron Unit Root Test #
## ##################################
##
## Test regression with intercept and trend
##
##
## Call:
## lm(formula = y ~ y.l1 + trend)
##
## Residuals:
## Min 1Q Median 3Q Max
## -0.083973 -0.015415 -0.002526 0.009332 0.170645
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 0.10275012 0.04851421 2.118 0.0351 *
## y.l1 0.96155565 0.01852595 51.903 <0.0000000000000002 ***
## trend 0.00011203 0.00006246 1.794 0.0740 .
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 0.02705 on 278 degrees of freedom
## Multiple R-squared: 0.9903, Adjusted R-squared: 0.9902
## F-statistic: 1.416e+04 on 2 and 278 DF, p-value: < 0.00000000000000022
##
##
## Value of test-statistic, type: Z-tau is: -2.5039
##
## aux. Z statistics
## Z-tau-mu 1.1638
## Z-tau-beta 2.2617
##
## Critical values for Z statistics:
## 1pct 5pct 10pct
## critical values -3.994127 -3.427199 -3.136601
##
## ##################################
## # Phillips-Perron Unit Root Test #
## ##################################
##
## Test regression with intercept
##
##
## Call:
## lm(formula = y ~ y.l1)
##
## Residuals:
## Min 1Q Median 3Q Max
## -0.089442 -0.014571 -0.002497 0.009620 0.171964
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 0.020316 0.015600 1.302 0.194
## y.l1 0.993054 0.005925 167.617 <0.0000000000000002 ***
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 0.02716 on 279 degrees of freedom
## Multiple R-squared: 0.9902, Adjusted R-squared: 0.9901
## F-statistic: 2.81e+04 on 1 and 279 DF, p-value: < 0.00000000000000022
##
##
## Value of test-statistic, type: Z-tau is: -1.2297
##
## aux. Z statistics
## Z-tau-mu 1.3459
##
## Critical values for Z statistics:
## 1pct 5pct 10pct
## critical values -3.455219 -2.87195 -2.572274
### DIFERENCIAS: Tipo de cambio
summary(ur.pp(DLDatos[, 2], type = "Z-tau", model = "trend", use.lag = 5))
##
## ##################################
## # Phillips-Perron Unit Root Test #
## ##################################
##
## Test regression with intercept and trend
##
##
## Call:
## lm(formula = y ~ y.l1 + trend)
##
## Residuals:
## Min 1Q Median 3Q Max
## -0.09095 -0.01306 -0.00158 0.01055 0.17069
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 0.001572438 0.001579672 0.995 0.320
## y.l1 0.263626725 0.058071315 4.540 0.00000841 ***
## trend -0.000009351 0.000019483 -0.480 0.632
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 0.02634 on 277 degrees of freedom
## Multiple R-squared: 0.07036, Adjusted R-squared: 0.06365
## F-statistic: 10.48 on 2 and 277 DF, p-value: 0.00004089
##
##
## Value of test-statistic, type: Z-tau is: -12.3906
##
## aux. Z statistics
## Z-tau-mu 1.2352
## Z-tau-beta -0.4753
##
## Critical values for Z statistics:
## 1pct 5pct 10pct
## critical values -3.994237 -3.427252 -3.136632
##
## ##################################
## # Phillips-Perron Unit Root Test #
## ##################################
##
## Test regression with intercept
##
##
## Call:
## lm(formula = y ~ y.l1)
##
## Residuals:
## Min 1Q Median 3Q Max
## -0.090664 -0.013492 -0.001331 0.010702 0.169754
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 0.001566 0.001577 0.993 0.322
## y.l1 0.264342 0.057972 4.560 0.00000768 ***
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 0.02631 on 278 degrees of freedom
## Multiple R-squared: 0.06959, Adjusted R-squared: 0.06624
## F-statistic: 20.79 on 1 and 278 DF, p-value: 0.000007682
##
##
## Value of test-statistic, type: Z-tau is: -12.4037
##
## aux. Z statistics
## Z-tau-mu 0.969
##
## Critical values for Z statistics:
## 1pct 5pct 10pct
## critical values -3.455298 -2.871985 -2.572293
##
## #######################
## # KPSS Unit Root Test #
## #######################
##
## Test is of type: tau with 5 lags.
##
## Value of test-statistic is: 0.3433
##
## Critical value for a significance level of:
## 10pct 5pct 2.5pct 1pct
## critical values 0.119 0.146 0.176 0.216
##
## #######################
## # KPSS Unit Root Test #
## #######################
##
## Test is of type: mu with 5 lags.
##
## Value of test-statistic is: 4.429
##
## Critical value for a significance level of:
## 10pct 5pct 2.5pct 1pct
## critical values 0.347 0.463 0.574 0.739
##
## #######################
## # KPSS Unit Root Test #
## #######################
##
## Test is of type: tau with 5 lags.
##
## Value of test-statistic is: 0.0701
##
## Critical value for a significance level of:
## 10pct 5pct 2.5pct 1pct
## critical values 0.119 0.146 0.176 0.216
##
## #######################
## # KPSS Unit Root Test #
## #######################
##
## Test is of type: mu with 5 lags.
##
## Value of test-statistic is: 0.0801
##
## Critical value for a significance level of:
## 10pct 5pct 2.5pct 1pct
## critical values 0.347 0.463 0.574 0.739