给定r时间序列图，我如何在其上绘制另一个单点？

Question

数据框：

df = data.frame(a=c(1,2,3), b=c("2014-01-01","2014-01-02","2014-01-03"),row.names=c('a', 'b', 'c'))

df$b <- as.Date(df$b)

我制作了一个情节：

plot(df$b,df$a)

如何在特定日期向地块添加另一个单点（红色）？

我试过了：

points(as.Date("2014-01-04"),4)

但它没有出现在剧情中？

Answer 1

您的限制不正确：

plot(df$b,df$a, ylim = c(0,5), xlim = as.numeric(range(df$b))+c(0,1))
points(as.Date("2014-01-04"),4)