控制 addLines

Question

我有一个用于制图的 xts 对象 (NCGSpot)，我想在给定日期向绘图添加一条垂直线。这是我的工作：

chartSeries(NCGSpot, TA="addBBands();addLines()", subset="2015-04-02::2016-08-01",theme="white")

如何控制线条的绘制位置。我见过像

这样的东西

addLines(v=anynumber)

但我无法理解它，也找不到任何关于它的信息。有什么方法可以将日期传递给 addLines 并在该日期获取线路？

提前致谢

Answer 1

如果您使用 chart_Series，（比 chartSeries 更好的图表功能）您可以使用包含逻辑矩阵类型的 xts 对象从头开始创建垂直线，其中 TRUE 适用于以下日期需要垂直线。如果您想要主图表上的垂直线，参数 on 应设置为 1 或 -1。设置 -1 会将线条放在蜡烛后面。其他有用的参数包括 col 和 border（应该是不言自明的）。这是一个让您入门的示例：

library(quantmod)

getSymbols("AAPL")

xt <- xts(rep(FALSE, NROW(AAPL)), index(AAPL))
dates_for_vertical_marks <- c("2016-02-01", "2016-04-29")
xt[dates_for_vertical_marks, ] <- TRUE

xt2 <- xts(rep(FALSE, NROW(AAPL)), index(AAPL))
dates_for_vertical_marks <- c("2016-07-01")
xt2[dates_for_vertical_marks, ] <- TRUE


chart_Series(AAPL, subset="2016")
add_TA(xt, on =-1, col= "orange", border='blue')
add_TA(xt2, on = 1, col= "darkgreen", border='darkgreen')

控制 addLines

Controlling addLines

charts

r

quantmod