我有多个类似格式的excel文件,但color .names因格式而异("NºExpedición"v. "NºExpedici�").
因此,我想读取它们省略列名,并添加一个带有文件名的列。
我已经分别解决了这两个问题,但我不知道如何同时拥有它们。color .names = F部分不工作,但我不知道如何在脚本中引入它。
df <- purrr::map_dfr(list.files(path = .,
pattern = "80_*", full.names = TRUE, recursive = T),
~read_excel(.x), col.names = F %>% mutate(file = sub(".xls", "", basename(.x))))
…只需要将col_names = F放入read_excel函数中:
~read_excel(.x, col_names = F)