4

これは少し初心者向けの質問だと思いますが、答えが見つからないか、何が間違っているのかわかりません。

次を使用して、別のディレクトリに保存されている20個のCSVファイルを読み込もうとしています:

setwd("./Data")
filenames <- list.files()  
All <- lapply(filenames,function(i){
  i <- paste(".\\",i,sep="")
  read.csv(i, header=TRUE, skip=4)
})

そして、次のエラーが表示されます。

Error in file(file, "rt") : cannot open the connection
In addition: Warning message:
In file(file, "rt") :
  cannot open file '.\filename.csv': No such file or directory

filename は、フォルダー内の最初のファイルの名前を表します。

前もって感謝します!

4

1 に答える 1

14

以下を削除してみてください:i <- paste(".\\",i,sep="")

read.csv はlist.files(full.names=TRUE)出力で正常に動作するはずです

setwd("./Data")
filenames <- list.files(full.names=TRUE)  
All <- lapply(filenames,function(i){
  read.csv(i, header=TRUE, skip=4)
})
于 2013-04-02T07:47:31.207 に答える