Function to quickly rbind multiple local data-files

batch_read.R

batch_read <- function(path, pattern, recursive = FALSE, read_fun, ...) {
  data.files <- list.files(path, pattern = pattern, recursive = recursive)
  data <- lapply(paste0(path, data.files), read_fun, ...)
  data <- do.call("rbind", data)
  data
}

Arguments

path Character. Path to folder containing the data. Should end on /.
pattern Character. Regular expression (file extension or other parts of the file name).
read_fun Function. Function used to read data files (e.g. read.csv).
... Other parameters passed to read_fun.

Example

data <- batch_read(
  url = "path/to/files/"
  , pattern = "\\.csv"
  , read_fun = read.csv
  , header = TRUE
)