r - 更改时间序列图上的轴

Question

我从以下数据框中制作了一个时间序列。

     Year    Month Demand
1 2010  January   48.5
2 2010 February   46.0
3 2010    March   54.4
4 2010    April   49.8
5 2010      May   48.1
6 2010     June   55.0

我使用以下内容来制作 ts 对象：

   ts.Monthly.Demand=Monthly.Demand%>%
  select(Demand)%>%
  ts(start=2010,frequency=12)

我使用以下内容制作情节：

ts.Monthly.Demand%>%
  autoplot()

如何将月份添加到 x 轴？

Answer 1

转换为动物园并使用scale_x_yearmon

library(zoo)

z.Monthly.Demand <- as.zoo(ts.Monthly.Demand)
autoplot(z.Monthly.Demand) + scale_x_yearmon() + xlab("")

给予：

或使用经典图形：

plot(z.Monthly.Demand)

Answer 2

由于autoplot返回一个对象，因此您可以像在任何其他 ggplot 工作流程中一样向其ggplot添加其他功能。ggplot这包括设置比例，例如随心所欲地使用scale_x_date和提供日期休息时间。几个格式化选项date_labels：

library(tidyverse)
library(ggfortify)

ts1 <- df %>%
  select(Demand) %>%
  ts(start = 2010, frequency = 12)

autoplot(ts1) + scale_x_date(date_labels = "%m-%Y")

autoplot(ts1) + scale_x_date(date_labels = "%B %Y")

autoplot(ts1) + scale_x_date(date_labels = "%b '%y")

由reprex 包（v0.2.0）于 2018 年 6 月 13 日创建。