添加点到 plot.ts，当开始，结束和频率设置

Question

我在向 plot.ts 添加点时遇到问题。如果我按照下面的示例创建 ts 对象，一切都很好，并且点会添加到图中。

data <- ts(rnorm(100))
plot(data)
ind <- c(1,10,67)
points(ind, data[ind], pch = 19, col = 'red')

但是当我这样做时（我希望在 X 轴上有日期，所以我使用开始、结束和频率参数。），点不会出现在图中：

data <- ts(rnorm(100), start = c(1996,1), end = c(2004,4), frequency = 12)
plot(data)
ind <- c(1,10,67)
points(ind, data[ind], pch = 19, col = 'red')

是否有任何选项可以将这些点添加到第一个示例中或添加日期？

附注。我几乎可以肯定，我曾经设法通过参考特定日期的时间序列的值来为绘图添加一点，但现在我无法将其带回来。

Answer 1

这对我有用：

data <- ts(rnorm(100), start = c(1996,1), end = c(2004,4), frequency = 12)
plot(data)
ind <- 1996 + c(0,9,66)/12
points(ind, data[c(1,10,67)], pch = 19, col = 'red')