R 将水平线添加到xts绘图

我想在xts对象绘图中添加一条水平线。我知道在

xts

中有添加垂直线的

addEventLines（）

函数，但以下内容不会在

xts

绘图中添加线：

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

---

除了在打印前向对象本身添加新列之外，还有其他解决方法吗？

您只需创建一些常量数据并使用

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）
#获取数据
数据（样本矩阵）
sample.xts你看到了吗？你也应该发布一个数据示例来帮助回答。@RLave是的，我知道我可以使用
plot.zoo（）
函数，但是因为我的数据是
xts
格式的，所以使用内置的
plot.xts（）
这是一个很好的解决方案，如果可以创建另一个完整的数据系列。实际上，我崩溃了，回归到使用
plot.zoo（）
，就像我过去所做的那样。它的设置时间要长得多，但对于定制来说要好得多。该函数能够与其他内置函数交互（
legend
、
abline
等）。