2

4951 個の名前付き要素の大きなリストがあります。これらの各要素は、基本的に文字です (つまり、文字列です)。私がやりたいことは、リストの各要素を個別のテキスト ファイルとしてエクスポートすることです。ファイルの名前は、リスト上の名前に対応しています。

私が持っているものの簡単なバージョンはこれです:

 letter1 <- c("here is some text")
 letter2 <- c("and here is some more text")
 letter3 <- c("and this is the final one")

 list <- list(letter1 = letter1, letter2 = letter2, letter3 = letter3)

そして、私は次のことを望みます:

letter1.txt の内容は「ここにテキストがあり
ます

ループを使用する必要があると思います。ただし、これを超える方法はわかりません。

for (i in 1:length(list)){

}
4

2 に答える 2

6

for (i in 1:length(list)) { write.csv(list[i], file=paste0(names(list)[i], ".txt")) }

編集

関数で出力ディレクトリが必要な場合:

 write.csv(list[i], file=paste0("output/", names(list)[i], ".txt"))
于 2015-05-12T12:44:09.033 に答える
3

これを試して:

filenames <- names(list)
for (i in 1:length(list)){
  outname <- paste("c:/testFolder/", filenames[i], ".txt", sep= "")
  write.table(list[[i]], outname, col.names= F, row.names= F, quote= F)
}
于 2015-05-12T12:45:44.970 に答える