我正在查看有关航班和机场详细信息的数据集。该数据集包含以下列，其中包含有关机场和航班详细信息的数据。
我想找到每个机场的竞争对手数量。我正在与dplyr合作，我想创建一个摘要文件，显示机场和该机场的竞争对手。
我知道你没有在摘要中使用count函数。我只是在摘要文件中编写函数时遇到问题。有什么建议吗？
我们可以利用
library(dplyr)
library(tidyr)
df1 %>%
group_by(origin, dest) %>%
summarise(competitors = n_distinct(op_career), .groups = 'drop') %>%
pivot_longer(cols = origin:dest, names_to = NULL,
values_to = 'Airport') %>%
select(Airport, competitors)
-输出
# A tibble: 2 × 2
Airport competitors
<chr> <int>
1 SFO 4
2 LAX 4
