# NOT RUN {
x <- cumsum(rnorm(1000))
y <- cumsum(rnorm(1000))
KSS_2006_Cointegration(x, y, case = 1, lags = 6, lsm = 3)
KSS_2006_Cointegration(MarketPrices[,1],MarketPrices[,2], case = 1, lags = 2, lsm = 1)
# }
Run the code above in your browser using DataLab