Подход с использованием map_df
, list.files
. Предполагая, что все ваши файлы хранят свои данные на первом листе.
library(tidyverse)
myConcat <-
list.files("Economic/New", recursive = TRUE, pattern =
"(?i)file.xlsx", full.names=TRUE) %>%
map_df( ~ readxl::read_excel(.x, sheet = 1))
# Runs and works on my own files, (with different directories and names, of course.)
(?i)
делает регистр нечувствительным; Я заметил, что у вас были File.xlsx и file.xlsx .