文本未出现在 XTS 图上

我在使用 R 向时间序列数据图中添加一些文本时遇到问题xts。我已经制作了一个简单的问题示例。

My text()命令似乎什么也没做，而我可以在图中添加一个点。我尝试尽可能使用默认值来保持代码简单

require(quantmod)

# fetch the data and plot it using default options
getSymbols('MKS.L')
plot(MKS.L$MKS.L.Close)

# try to add text - doesn't appear
text(as.Date('2012-01-01'),y=500,"wobble", cex=4)

# add a point - this does appear
testPos <- xts(600, as.Date('2012-01-01'))
points( testPos, pch = 3, cex = 4, col = "red" )

感谢任何帮助 - 我对 R 还很陌生，我已经花了几个小时在这上面！

不是直接回答，而是plot.xts附带的功能xts包尚未完全开发。

你最好使用plot.zoo or plot.xts来自xtsExtra https://r-forge.r-project.org/R/?group_id=118包（它是作为 Google Summer of Code 项目编写的，目的是将其整合到 xts 包中）

其中任何一个都可以工作：

plot(as.zoo(MKS.L$MKS.L.Close))
text(as.Date('2012-01-01'),y=500,"wobble", cex=4)

#install.packages("xtsExtra", repos="http://r-forge.r-project.org")
xtsExtra::plot.xts(MKS.L$MKS.L.Close)
text(as.Date('2012-01-01'),y=500,"wobble", cex=4)