在保留名称的同时在R中导入多个csv文件

Question

How do I import multiple csv files, all in one folder, while retaining their names. For example, if the file a.csv should be imported as "a", b.csv should be imported as "b", etc.

Edit: Just to to be specific... I do NOT want to type out the names of the files individually, because there's a whole bunch of them. I want to have a system which simple reads in all the files from a directory and retains the original file names.

Answer 1

Yadda yadda use a list yadda

filenames <- c("a", "b", "c")

dfs <- setNames(lapply(filenames, function(f)
    read.csv(paste0(f, "csv")), filenames))

Answer 2

use assign . A simple iteration is as follows:

basenames <- c("a", "b" , "c")

lapply(basenames, function(x) 
  assign(x, read.csv(paste0(x, ".csv")), envir=.GlobalEnv)
  )

Answer 3

This is how I do it, like Hong Ooi, with a list...

# assuming your working directory is the folder with the CSVs
myfiles <- dir(pattern = "\\.(csv|CSV)$", full.names = TRUE) # get filenames and paths
myfiles_data <- lapply(myfiles, data.table::fread) # read data from files, quickly
head(myfiles_data[[1]]) # validate file reading
names(myfiles_data) <- myfiles # assign names to list items

Answer 4

Another approach using plyr function:

library(plyr)
mydata = ldply(list.files(pattern = “csv”), function(filename) {
dum = read.table(filename)
    #If you want to add the filename as well on the column
    dum$filename = filename
return(dum)
})