星期几

理解长期趋势很困难，因为存在非常强的星期几效应，它掩盖了更细微的模式。我们先来看一下航班数量按星期几的分布：

daily <- daily %>% mutate(wday = wday(date, label = TRUE)) ggplot(daily, aes(wday, n)) + geom_boxplot()