0

我有很多 Excel 文件。每个文件都具有相同的格式和列数。假设文件 A 包含数据

    501 0006232.txt 0006235.txt 502 0.019047619 0.045989773
                    0006236.txt 503 0.042735043 0.116345945
                    0006239.txt 504 0.038095238 0.059372542
                    0006240.txt 505 0.0078125   0.007727828
                    0006247.txt 507 0.051724138 0.082823013

同样，包含数据的文件 B

    502 0006235.txt 0006236.txt 503 0.075757576 0.377716498
                    0006239.txt 504 0.01754386  0.043033148
                    0006240.txt 505 0.012987013 0.014002801
                    0006246.txt 506 0.044444444 0.150648715
                    0006247.txt 507 0.044117647 0.105052539

现在，我想以下列方式合并这些文件

501 0006232.txt 0006235.txt 502 0.019047619 0.045989773
                0006236.txt 503 0.042735043 0.116345945
                0006239.txt 504 0.038095238 0.059372542
                0006240.txt 505 0.0078125   0.007727828
                0006247.txt 507 0.051724138 0.082823013
502 0006235.txt 0006236.txt 503 0.075757576 0.377716498
                0006239.txt 504 0.01754386  0.043033148
                0006240.txt 505 0.012987013 0.014002801
                0006246.txt 506 0.044444444 0.150648715
                0006247.txt 507 0.044117647 0.105052539

但无法做到这一点。我怎样才能做到这一点 ？

4

2 回答 2

0

如果“文件”（又名数据）具有相同数量的列（并且最好是）数据类型，则以下解决方案将起作用：

    #--Dummy data

    file_1 <- data.frame(
      X = sample(1:10),
      Y = sample(c("yes", "no"), 10, replace = TRUE)
    )

    file_2 <- data.frame(
      X = sample(1:10),
      Y = sample(c("yes", "no"), 10, replace = TRUE)
    )

    #--Rbind to 'merge' the data

    merge_df <- rbind(file_1, file_2)
于 2017-12-13T12:32:13.967 回答
0

首先，我读取目录中的第一个文件。然后将其他文件与它一一结合。这是我的代码。

f1=read.xlsx(list.files()[1],sheet = 1,colNames = FALSE)
for(i in 2:length(list.files()))
{
  f=read.xlsx(list.files()[i],sheet = 1,colNames = FALSE)
  f1=rbind(f1,f)
}
write.xlsx(f1,"titleResults.xlsx",)
于 2017-12-14T11:52:25.590 回答