将水平线添加到 xts 图

Question

我想在 xts 对象图上添加一条水平线。我知道 xts 中有 addEventLines() 函数可以添加垂直线，但以下不会向 xts 图中添加一条线：

abline(h=abc, col="green")

除了在绘图之前向对象本身添加新列之外，是否有解决此问题的方法？

Answer 1

您可以只创建一些常量数据并使用 lines 函数。下面是一个解决方案以及一个可重现的例子。

# load package
require(xts)

# get data
data(sample_matrix)
sample.xts <- as.xts(sample_matrix)

# create line data
sample.xts$horizontal_line <- 49.5

# plot 
plot(sample.xts[,"Close"])
lines(sample.xts[, "horizontal_line"], col = "blue")

将水平线添加到 xts 图

Add Horizontal Line to xts Plot

plot

r

xts