R:具有 NA 结果的 Durbin Watson 测试
R: Durbin Watson test with NA result
我正在尝试使用 R 中的 Durbin Watson 测试来衡量历史股票价格与指数之间的相关性。
这是我目前所做的:
data <- read.xlsx("data.xlsx", colNames = TRUE, detectDates = TRUE)
data
head(data)
data$X1 <- as.Date(data$X1)
bbva <- xts(data$BBVA, data$X1)
ibex <- xts(data$IBEX, data$X1)
ldbbva <- diff(log(bbva))
ldibex <- diff(log(ibex))
这里我填了一些NA值
mean <- mean(ldbbva, na.rm = TRUE)
ldbbva[is.na(ldbbva)] <- mean
mean <- mean(ldibex, na.rm = TRUE)
ldibex[is.na(ldibex)] <- mean
然后我进行回归
regression <- lm(ldibex ~ ldbbva)
如果我们看一下 ldibex
(例如),我们可以看到类似这样的内容:
[,1]
2010-01-04 -0.0001060206
2010-01-05 0.0048708104
2010-01-06 0.0014819410
2010-01-07 -0.0046086970
2010-01-08 -0.0002712618
2010-01-11 -0.0073027658
但是当我尝试 运行 测试 dwtest(regression)
时,这是输出:
Durbin-Watson test
data: regression
DW = NA, p-value = NA
alternative hypothesis: true autocorrelation is greater than 0
我已经填写了所有 NA 值,所以我不明白为什么会这样 NA
。
在 Durbin-Watson 测试中使用 xts
对象时出现问题。尝试将您的数据转换为数值向量:
ldbbva <- as.numeric(diff(log(bbva)))
ldibex <- as.numeric(diff(log(ibex)))
希望对您有所帮助!
我正在尝试使用 R 中的 Durbin Watson 测试来衡量历史股票价格与指数之间的相关性。
这是我目前所做的:
data <- read.xlsx("data.xlsx", colNames = TRUE, detectDates = TRUE)
data
head(data)
data$X1 <- as.Date(data$X1)
bbva <- xts(data$BBVA, data$X1)
ibex <- xts(data$IBEX, data$X1)
ldbbva <- diff(log(bbva))
ldibex <- diff(log(ibex))
这里我填了一些NA值
mean <- mean(ldbbva, na.rm = TRUE)
ldbbva[is.na(ldbbva)] <- mean
mean <- mean(ldibex, na.rm = TRUE)
ldibex[is.na(ldibex)] <- mean
然后我进行回归
regression <- lm(ldibex ~ ldbbva)
如果我们看一下 ldibex
(例如),我们可以看到类似这样的内容:
[,1]
2010-01-04 -0.0001060206
2010-01-05 0.0048708104
2010-01-06 0.0014819410
2010-01-07 -0.0046086970
2010-01-08 -0.0002712618
2010-01-11 -0.0073027658
但是当我尝试 运行 测试 dwtest(regression)
时,这是输出:
Durbin-Watson test
data: regression
DW = NA, p-value = NA
alternative hypothesis: true autocorrelation is greater than 0
我已经填写了所有 NA 值,所以我不明白为什么会这样 NA
。
在 Durbin-Watson 测试中使用 xts
对象时出现问题。尝试将您的数据转换为数值向量:
ldbbva <- as.numeric(diff(log(bbva)))
ldibex <- as.numeric(diff(log(ibex)))
希望对您有所帮助!