http://www.r-bloggers.com/looping-through-files/
</p>
<p>setwd("c:\\path")<br />
filenames <- dir(path="c:\\path",pattern = "^[a]")<br />
filenames <- noquote(filenames)<br />
for(i in 1:length(filenames)){<br />
file <- read.csv(filenames[i])<br />
}<br />
读取所有以a为开头的csv文件。
</p>
