r - 如何在时间序列数据上使用 ggfortify 库实现分面网格功能？

Question

我正在使用并且RStudio我有一个名为.time seriestsdata1

以下是data1外观：

     Jan Feb Mar Apr May Jun Jul Aug Sep Oct Nov Dec
2014 135 172 179 189 212  47 301 183 247 292 280 325
2015 471 243 386 235 388 257 344 526 363 261 189 173
2016 272 267 197 217 393 299 343 341 315 305 384 497

为了绘制上述内容，我运行了以下代码：

plot (data1)

我得到以下情节：

我想要一个按年份打破的情节，我正在考虑实现在其中facet_grid找到的功能，ggplot2但由于我的数据是一个ts对象，我不能ggplot2直接在它上面使用。

经过一番研究，我发现该ggfortify库可以处理ts对象。但是，我很难弄清楚如何使用该facet_grid功能。

我的目标是从我的数据中绘制如下内容ts：

'Female' 和 'Male' 将替换为 2014、2015 和 2016 年。X 轴将是月份（Jan、Feb、Mar 等），y 轴将是ts文件中的值. 我更喜欢线图而不是点图。

我是在正确的轨道上还是有另一种方法来解决这个问题？

Answer 1

我们可以使用ggplot2::autoplot. 我将以AirPassengers数据为例。

library(ggplot2)
library(lubridate)
autoplot(AirPassengers) + 
 facet_grid(. ~ year(Index), scales = "free_x") + 
 scale_x_date(date_labels = "%b")