我正在以一种低效的方式导入和转换许多文件。我想知道是否有人可以向我展示使用 purr 的更快方法。以下代码是我尝试过的，它应该为您提供一般模式：
data_2013 <- read_csv("data_2013") %>%
clean_names() %>% # using the janitor package
mutate(year = "2013")
data_2014 <- read_csv("data_2014") %>%
clean_names() %>%
mutate(year = "2014")
随着年数增加 1（一直到 2019 年）。我最终加入了所有这些文件，因为关键变量是相同的。但显然文件的导入效率低下。
任何帮助将不胜感激