如何在quantmod中添加多条垂直线？

Question

目标：我想在我的图表中添加多条垂直线条。在此示例中，我想为以下日期添加垂直线：2012-01-09,2012-01-24和2012-01-31。

问题：但是，我的代码会添加4行而不是3行，并在错误的日期添加它们。

有人能告诉我我做错了什么吗？ 谢谢！

library(quantmod)
getSymbols("SPY", from="2012-01-01", to="2013-06-15")

#add multiple vertical lines
chartSeries(SPY,TA="addLines(v=SPY[c(5,15,20)])")

Answer 1

我有一个hackish方式在我的qmao包（https://r-forge.r-project.org/R/?group_id=1113）中执行它，它基于this post到r-sig-finance邮件列表。

如果您不想打扰安装整个软件包，请输入以下代码：https://r-forge.r-project.org/scm/viewvc.php/pkg/qmao/R/addVLine.R?view=markup&root=twsinstrument

chartSeries(SPY)
addVLine(index(SPY[c(5,15,20)]))

产生：