R 4 data science中一题。

使用排秩函数找出10 个延误时间最长的航班。如何处理名次相同的情况？仔细阅读
min_rank() 的帮助文件。
   加载库：
   library(tidyverse)
   library(nycflights13)
  第一个实现：正确没问题。
   flights %>% mutate(dep_delay_rank = min_rank(-dep_delay)) %>% arrange(dep_delay_rank) %>% filter(dep_delay_rank<=10)
  第二个实现，把filter改为select
   flights %>% mutate(dep_delay_rank = min_rank(-dep_delay)) %>% arrange(dep_delay_rank) %>% select(dep_delay_rank<=10)
   出现错误,如下：
    Error in .f(.x[], ...) : object 'dep_delay_rank' not found

没弄明白，求高人指点。