powered by
makeLeadLagMatrix(x, n.lag, n.lead)
matrix
numeric(1)
nrow(x)
cointRegD
getLeadLag
getModD
x <- matrix(1:20, 2, byrow = TRUE) cointReg:::makeLeadLagMatrix(x = x, n.lag = 2, n.lead = 3)
Run the code above in your browser using DataLab