作業ディレクトリからファイルを開く

Question

次の問題があります。私は自分の作業ディレクトリに複数のcsvファイルをインポートしました。何か助けていただければ幸いです

files 
[1] "sept2010.csv__001.csv" "sept2010.csv__002.csv" "sept2010.csv__003.csv" "sept2010.csv__004.csv""sept2010.csv__005.csv" "sept2010.csv__006.csv" 

私は200以上のcsvファイルを持っています。

Error in file(file, "rt") : cannot open the connection 

I：

myfiles = do.call(rbind, lapply(files, function(x) read.csv(x, stringsAsFactors = FALSE))) 

私は、エラーメッセージが表示されました：私は、ファイルを開くためにワンド場合、私は私がファイルを開こうとすると

data<-rbind(sept2010.csv__001.csv,sept2010.csv__002.csv) # It is time consuming to rbing 200 files. 

でそれを行うことができます以下を試してください：

data<-do.call("rbind", lapply(files, read.csv, header = TRUE)) 

I geトン私は手動でファイルを開こうとすると同じエラーメッセージ

は：

folder <- "C:/Users/NewPap/Desktop/DATA/test"  
file_list <- list.files(path=folder, pattern="*.csv") 
for (i in 1:length(file_list)){ 
    assign(file_list[i], 
    read.csv((paste(folder, file_list[i], sep=''))) 
    )} 

私は私が間違って何をしたかわからない、同じエラーに

を取得します。すべてのファイルは、その後、作業ディレクトリにある場合は任意の助けに

Answer 1

をお願い申し上げ

lapply(grep(".csv",list.files(full.names=T),value="TRUE"),read.csv) 

リスト内のすべてのCSVファイルを開く必要があります（各ファイルの内容は、リストの要素になります）。

すべてのCSVファイルは、列の数が同じ場合は、

do.call("rbind",lapply(grep("csv",list.files(full.names=T),value="TRUE"),read.csv)) 

は、すべてのCVSファイルを含む単一のデータフレームを生成します。

Answer 2

folder <- "C:/Users/NewPap/Desktop/DATA/test"  
files <- list.files(path=folder, pattern="*.csv") 

これを試してみてください：十分ではありません

data = Map(f = read.csv,files,header=T) 
Reduce(function(x,y){rbind(x,y)},data)