一月份（和十二月份）的航班较少，夏季（5月至9月）的航班较多。由于我们只有一年的数据，无法对这个模式进行定量分析。但我们可以利用领域知识来头脑风暴，寻找潜在的解释。

周六的季节性效应

我们先来解决无法准确预测周六航班数量的问题。一个好的起点是回到原始数据，重点关注周六：

daily %>% filter(wday == "Sat") %>% ggplot(aes(date, n)) + geom_point() + geom_line() + scale_x_date( NULL, date_breaks = "1 month", date_labels = "%b" )

（我同时使用了点和线，以便更清楚地区分哪些是数据、哪些是插值。）

我怀疑这个模式是由暑假造成的：许多人在夏天去度假，而且人们不介意在周六出行度假。从这张图来看，我们可以猜测暑假是从六月初到八月底。这似乎与 该州的学校学期安排相当吻合：2013 年的暑假是 6 月 26 日至 9 月 9 日。