r - plot.xts + abline は正確ではありませんか?

Question

xts オブジェクトの散布図をプロットするために使用xtsExtraしていて、ゼロを通る水平線を描画したかったのですが、間違った場所にあるように見えます...以下のコードを参照してください。これはバグですか？

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

ジェフ・ライアンはここでこれに答えたかもしれません:

試す、

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

の「ドット」に注意してください.index。実際には、x 軸にxts内部 POSIXct(like)時間を使用するため、その方法でアクセスする必要があります。