Advertisement
Guest User

Untitled

a guest
Oct 26th, 2016
48
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.14 KB | None | 0 0
  1. vecm <- ca.jo(Data[, c("LR", "LYR", "LP", "LTR","LGR")], type = "trace", K =5, spec = "transitory")
  2. > vecm.r1 <- cajorls(vecm, r = 4)
  3. > vecm.r1
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement