【R语言】用sqlite合并文件时，FOR循环报错，请大神指教该如何解决啊

library(readr)
library(DBI)
library(magrittr)

all_files <- list.files('F:/学习/R语言/downloadData/R日志')
con <- dbConnect(RSQLite::SQLite(),"F:/学习/R语言/sqlite库/data.db")

for (i in 1:length(all_files)){
  print(i)
  df <- read_csv(all_files[i],
                 col_types = cols(date = col_character(),
                                  time = col_character())) %>% as.data.frame()
  dbWriteTable(con, "all_data", df, overwrite = FALSE,append =TRUE)
}
Rstudio中运行上面代码时，FOR循环报错：