Soy un estudiante de ciencias de la computación que trabaja en un proyecto de informática financiera y tengo una pregunta sobre las pruebas de cointegración utilizando la regresión lineal con la función lm().
https://www.rdocumentation.org/packages/stats/versions/3.6.2/topics/lm
Datos:
He visto muchos ejemplos a través de diferentes estrategias/notas en línea y me preguntaba cuál es la correcta para usar bajo ciertos escenarios ( +0, +1, o nada)
Ej:
m <- lm(series[[9]] ~ series[[1]] + 0)
beta <- m$coefficients[1]
cat ("Assumed hedge ratio is ", beta, "\n")
sprd <- series[[9]] - beta * series[[1]]
adf.test(sprd, alternative = 'stationary', k=0)$p.value #0.6647128
m <- lm(series[[9]] ~ series[[1]] + 1)
beta <- m$coefficients[1]
cat ("Assumed hedge ratio is ", beta, "\n")
sprd <- series[[9]] - beta * series[[1]]
adf.test(sprd, alternative = 'stationary', k=0)$p.value #0.5656023
model <- lm(series[[9]] ~ series[[1]])
b <- model$coefficients[2]
spreadp1 <- series[[9]] - b*series[[1]]
adf.test(spreadp1, k=0)$p.value # 0.4339312