r - 时间序列图，x 轴在 "year"-"month"在 R

Question

我有一个“月度数据”，我想绘制数据，以便获得格式 %Y-%m" (2001-01) 的日期在 x 轴上。说我的数据是 pcp <- rnorm(24) .

我试过了:

PCP <- ts(pcp, frequency = 12, start = 2001)
plot(PCP) 

但该图仅在 x 轴上显示年份。

如何在 x 轴上获得我想要的日期格式的图？

Answer 1

这是一个关于玩具数据的想法，因为这个问题是不可重现的。希望它有帮助

R> foo = ts(rnorm(36), frequency = 12, start = 2001)
R> plot(foo, xaxt = "n")
R> tsp = attributes(foo)$tsp
R> dates = seq(as.Date("2001-01-01"), by = "month", along = foo)
R> axis(1, at = seq(tsp[1], tsp[2], along = foo), labels = format(dates, "%Y-%m"))

ggplot 版本的数据看起来像你的

R> df = data.frame(date = seq(as.POSIXct("2001-01-01"), by = "month", length.out = 36), pcp = rnorm(36))
R> library(ggplot2)
R> library(scales)
R> p = ggplot(data = df, aes(x = date, y = pcp)) + geom_line()
R> p + scale_x_datetime(labels = date_format("%Y-%m"), breaks = date_breaks("months")) + theme(axis.text.x = element_text(angle = 45))