Leer varios archivos CSV en marcos de datos separados

Gracias a todos por responder.

Para completar aquí está mi respuesta final para cargar cualquier número de archivos delimitados (tab), en este caso con 6 columnas de datos cada una donde la columna 1 es caracteres, 2 es factor y el resto numérico:

##Read files named xyz1111.csv, xyz2222.csv, etc.
filenames <- list.files(path="../Data/original_data",
    pattern="xyz+.*csv")

##Create list of data frame names without the ".csv" part 
names <-substr(filenames,1,7))

###Load all files
for(i in names){
    filepath <- file.path("../Data/original_data/",paste(i,".csv",sep=""))
    assign(i, read.delim(filepath,
    colClasses=c("character","factor",rep("numeric",4)),
    sep = "\t"))
}

Use assign con una variable de carácter que contenga el nombre deseado de su marco de datos.

for(i in 1:100)
{
   oname = paste("file", i, sep="")
   assign(oname, read.csv(paste(oname, ".txt", sep="")))
}

No lo hagas. Guárdalos como una lista. Es el camino a seguir.

Aquí hay una manera de desempaquetar una lista de datos.marcos usando just lapply

filenames <- list.files(path="../Data/original_data",
                        pattern="xyz+.*csv")

filelist <- lappy(filenames, read.csv)

#if necessary, assign names to data.frames
names(filelist) <- c("one","two","three")

#note the invisible function keeps lapply from spitting out the data.frames to the console

invisible(lapply(names(filelist), function(x) assign(x,filelist[[x]],envir=.GlobalEnv)))

Esta respuesta pretende ser un complemento más útil a la respuesta de Hadley.

Mientras que el OP quería específicamente que cada archivo se leyera en su espacio de trabajo R como un objeto separado, muchas otras personas que ingenuamente aterrizan en esta pregunta pueden pensar que eso es lo que quieren hacer, cuando de hecho estarían mejor leyendo los archivos en una sola lista de marcos de datos.

Así que para que conste, así es como puedes hacer eso.

#If the path is different than your working directory
# you'll need to set full.names = TRUE to get the full
# paths.
my_files <- list.files("path/to/files")

#Further arguments to read.csv can be passed in ...
all_csv <- lapply(my_files,read.csv,...)

#Set the name of each list element to its
# respective file name. Note full.names = FALSE to
# get only the file names, not the full path.
names(all_csv) <- gsub(".csv","",
                       list.files("path/to/files",full.names = FALSE),
                       fixed = TRUE)

Ahora cualquiera de los archivos puede ser referido por my_files[["filename"]], que realmente no es mucho peor que solo tener variables filename separadas en su espacio de trabajo, y a menudo es mucho más conveniente.

Una forma sencilla de acceder a los elementos de una lista desde el entorno global es attach la lista. Tenga en cuenta que esto en realidad crea un nuevo entorno en la ruta de búsqueda y copia los elementos de su lista en ella, por lo que es posible que desee eliminar la lista original después de adjuntar para evitar tener dos copias potencialmente diferentes flotando alrededor.

Leer todos los archivos CSV de una carpeta y crear vactors iguales que los nombres de archivo:

setwd("your path to folder where CSVs are")

filenames <- gsub("\\.csv$","", list.files(pattern="\\.csv$"))

for(i in filenames){
  assign(i, read.csv(paste(i, ".csv", sep="")))
}

#copy all the files you want to read in R in your working directory
a <- dir()
#using lapply to remove the".csv" from the filename 
for(i in a){
list1 <- lapply(a, function(x) gsub(".csv","",x))
}
#Final step 
for(i in list1){
filepath <- file.path("../Data/original_data/..",paste(i,".csv",sep=""))
assign(i, read.csv(filepath))
}