r - 表数组

Question

我想将一些 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 文件。不是所有的人。我将如何解决这个问题？

Answer 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)
     }