Just to complete: if you need them all at the same time: for(i in 1:100) { fn <- paste("velocity",i,".txt",sep="") varname <- paste("velocity",i,sep="") assign(varname,read.csv(fn)) } and you have a list of objects {velocity1, ..., velocity100} with corresponding data. Scionforbai