xts が提案されている方法のように思われるため、時系列の作業で可能な限り xts を使用しようとしています。ただし、奇妙なエラーが発生しました。
CPI.NSA と INT は xts オブジェクトです。
library(dynlm)
CPI.NSA.x <- CPI.NSA[dr1]
INT.x <- INT[dr1]
CPI.NSA.z <- as.zoo(CPI.NSA.x)
INT.z <- as.zoo(INT.x)
> dynlm(CPI.NSA.z ~ INT.z + L(CPI.NSA.z, 1))
Time series regression with "zoo" data:
Start = 1953-02-01, End = 1971-06-01
Call:
dynlm(formula = CPI.NSA.z ~ INT.z + L(CPI.NSA.z, 1))
Coefficients:
(Intercept) INT.z L(CPI.NSA.z, 1)
-0.0006795 1.0440174 -0.0869050
> dynlm(CPI.NSA.x ~ INT.x + L(CPI.NSA.x, 1))
Error in `[.xts`(a, match0(indexes, attr(a, "index")), , drop = FALSE) :
i is out of range
Zooを取る関数があるときはいつでも、それをxtsに渡すことができ、それはうまくいくはずだと私は理解していましたが、ここでは明らかにそうではありません。
どうしたの?
助けてくれてありがとう。