Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- vecm <- ca.jo(Data[, c("LR", "LYR", "LP", "LTR","LGR")], type = "trace", K =5, spec = "transitory")
- > vecm.r1 <- cajorls(vecm, r = 4)
- > vecm.r1
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement