r - plot.xts + abline 不太准确？

Question

我xtsExtra用来绘制 xts 对象的一些散点图，并想通过零画一条水平线，但看起来它在错误的位置......请看下面的代码？这是一个错误吗？

set.seed(123)
require(xts)
f <- xts(rnorm(100,0.0001,0.003),Sys.Date()-c(100:1))
f1 <- xts(rnorm(100,0.0001,0.003),Sys.Date()-c(100:1))
require(xtsExtra)
plot(f,f1)
abline(h=0,col='red')

Answer 1

Jeff Ryan 可能在这里回答了这个问题：

尝试，

abline(v=.index(X)[50], col="red")

注意 中的“点” .index。事实是x 轴xts使用内部 POSIXct(like)时间，因此您需要以这种方式访问​​它。