R - Read all csv in folder with purrr

read_all_csv_purrr.r

library(tidyverse)

files <- list.files(path = "./data/", pattern = "*.csv")

df <- files %>% 
    map(function(x) {
        read_csv(paste0("./data/", x))
    }) %>%
    reduce(rbind)
    
 # Reference: http://serialmentor.com/blog/2016/6/13/reading-and-combining-many-tidy-data-files-in-R