与期货异步收集数据库查询

Question

我正在尝试异步处理dbplyrs查询，但目前无法正常工作

library(dplyr)
library(tibble)
library(DBI)

con <- dbConnect(RSQLite::SQLite(), path = ":memory:")
db_flights <- copy_to(con, nycflights13::flights)

db_flights

flights_10000_df %<-% {
  db_flights %>% 
    head(10000) %>% 
    dplyr::collect()
}
#> Error in UseMethod("collect") : 
#> nicht anwendbare Methode für 'collect' auf Objekt der Klasse "list" angewendet

这是什么问题？ （很抱歉德语错误）

（计划以后再解决问题）