Code like the following example reads all of the Excel files in a directory into a list and then combines that list into one data frame. The Excel files should have identical column structure.
library(purrr)
library(dplyr)
library(readxl)
ExcelFiles <- list.files(path = "R/Play", pattern = ".xlsx",
full.names = TRUE)
AllFiles <- map(ExcelFiles, .f = read_excel)
AllData <- bind_rows(AllFiles)