在 nycflights13 数据集中，9 月份哪家航空公司的起飞航班最晚答案

【问题标题】：which carrier in September had the most late departing flights in nycflights13 dataset在 nycflights13 数据集中，9 月份哪家航空公司的起飞航班最晚
【发布时间】：2022-11-16 15:23:38
【问题描述】：

在 nycflights13 数据集中哪个航空公司 9 月份的出发航班最晚

q8 <- flights%>%
  select(carrier,month,dep_delay)%>%
  filter(month==9)%>%
  group_by(carrier)%>%
  tally()%>%
  arrange(desc(n))

这是我使用的代码

【问题讨论】：

标签： r

【解决方案1】：

我已经提供了我的代码来回答这个问题，并为代码的每个部分做了什么注释。您的代码的主要问题是它不包含查找航班是否延误的方法。我在下面展示一种方法。

flights %>% # take this data
  filter(month == 9, # filter for September
         dep_delay > 0) %>%  # pick only flights with delays
  group_by(carrier) %>% # group by carrier
  count() %>%  # count delayed flights by carrier
  arrange(desc(n)) # arrange in descending order

这给你这个输出，显示 UA 在 9 月有最多的延迟 (n = 1559)：

# A tibble: 16 × 2
# Groups:   carrier [16]
   carrier     n
   <chr>   <int>
 1 UA       1559
 2 EV       1338
 3 B6       1190
 4 DL        919
 5 AA        709
 6 MQ        556
 7 WN        483
 8 9E        449
 9 US        306
10 VX        142
11 FL        109
12 F9         29
13 YV         16
14 AS          7
15 HA          2
16 OO          1

【讨论】：