1

いくつかの R テーブルを Excel ファイルに書き込みたい。それで、私は次のことを持っていますか?

 data <- list.files(path=getwd())
 n <- length(list)
 for (i in 1:n) 
     {
      data1 <- read.csv(data[i])
      outline <- data1[,2]
      outline <- as.table(outline)
      print(outline)   # this prints all n tables
      write.csv(outline, 'Test.csv') # this only writes the last table
     }

しかし、csv ファイルに書き込まれた最後のファイルのみを取得します。それらのすべてではありません。どうすればこれを修正できますか?

4

1 に答える 1

1

test.csv毎回あなたの書き込み。したがって、ファイルを書き続けます。異なるファイルを保持するには、各ステップのファイル名を変更する必要があります。

試す:

data <- list.files(path=getwd())
 n <- length(list)
 for (i in 1:n) 
     {
      data1 <- read.csv(data[i])
      outline <- data1[,2]
      outline <- as.table(outline)
      print(outline)   # this prints all n tables
      name <- paste0(i,"X.csv")
      write.csv(outline, name)
     }

あなたのコードを見ると、代わりにこれが必要になるかもしれません:

data <- list.files(path=getwd())
     n <- length(list)
     for (i in 1:n) 
         {
          data1 <- read.csv(data[i])
          outline <- data1[,2]
          outline <- as.data.frame(table(outline))
          print(outline)   # this prints all n tables
          name <- paste0(i,"X.csv")
          write.csv(outline, name)
     }
于 2013-02-18T18:32:48.950 に答える