0

.csv ファイルのリストがあり、それらすべての最初の 3 行を削除する必要があります。それらを一度に行う方法はありますか？

「test」という名前のファイルに対して個別に実行するコードは次のとおりです: test<-test[-c(1:3),]

インポートしたファイルのリストに対して上記の行を実行したい: filenames <- list.files(path = getwd())

上記のファイルを処理した後、cbind を使用して単一のファイルを作成したいと考えています。よろしくお願いいたします。

4

2 に答える 2

2

以下を試して、動作するかどうかを確認できます。

result <- do.call(cbind, lapply( list.files(path = getwd()), function(n) read.csv(file=n , skip = 3) ))
于 2013-03-12T00:44:01.050 に答える
1 
csvlist <- lapply(csvnames, function(nam) read.csv( file=nam) )
do.call( cbind, lapply(csvlist, "[", -c(1:3)) )

あなたの質問は、入力戦略が成功したことを暗示していましたが、現在エラーを報告しているため、ファイルのより良い説明を提供する必要があります. 最初の 3 行を除外するとうまくいく場合があります。

csvlist <- lapply(csvnames, function(nam) read.csv( file=nam, header=FALSE, skip=3) )
do.call( cbind, csvlist )  # no longer need to remove since skip=3 did that.

rbindの代わりに本当にしたくないですcbindか?

于 2013-03-12T00:33:34.080 に答える