如何为R中的时间序列图设置自己的x轴标签？

我有一个时间序列，当我绘制它时，默认的x轴没有很好的标记

aa=sample(x=1:500,size = 804,replace = T)
Year_mon <- seq(from=as.Date("1950-01-15"),to=as.Date("2016-12-15"),by="months")
plot(aa~Year_mon, type="l", lty=1)

aa=样品（x=1:500，尺寸=804，替换=T）
我们可以使用
axis.Date
来实现这一点

set.seed(1234)
aa <- sample(x=1:500,size = 804, replace = T)
Year_mon <- seq(from = as.Date("1950-01-15"), to = as.Date("2016-12-15"), by = "months")
plot(aa~Year_mon, type = "l", lty = 1)
axis.Date(1, at = as.Date(paste0(seq(1950, 2010, 10), "-01-01")), format="%Y")

set.seed（1234）
非常感谢。但是你能解释一下为什么我的代码不起作用吗？谢谢。
Year\u mon
是日期，因此您需要
axis.date
。感谢您的帮助。请查看
？日期。它说“日期表示为自1970-01-01以来的天数，早期日期为负值。”因此，当您将一个标签置于1时，即1970-01-02。然后你一次提高10天。@G5W非常感谢你的进一步解释。
set.seed(1234)
aa <- sample(x=1:500,size = 804, replace = T)
Year_mon <- seq(from = as.Date("1950-01-15"), to = as.Date("2016-12-15"), by = "months")
plot(aa~Year_mon, type = "l", lty = 1)
axis.Date(1, at = as.Date(paste0(seq(1950, 2010, 10), "-01-01")), format="%Y")