Question

我有很多.txt个文件。您可以下载2 of them from here。我将它们导入RStudio并使用下面的代码将它们组合成一个data.frame

setwd("C:/Users/aelwan/Dropbox/import_txt")
data<-do.call(rbind, lapply(list.files(pattern = ".txt"), 
                            read.table, 
                            header=T))
    head(data, 12)
     observed    simulated
1         2         4
2         5         5
3         5         2
4         2         5
5         5         2
6         2        12
7         1        56
8         2        75
9         3        78
10        6        75
11        7        65
12        7        53

我想将文件名添加到data.frame，如下所示

     observed    simulated    ID
1         2         4         simu1           
2         5         5         simu1
3         5         2         simu1
4         2         5         simu1
5         5         2         simu1
6         2        12         simu1
7         1        56         simu2
8         2        75         simu2
9         3        78         simu2
10        6        75         simu2
11        7        65         simu2
12        7        53         simu2

有任何建议怎么做？

Answer 1

如果使用public class A { private int var; private B b; public A(B b) { this.var = 0; this.b = b; } public void set(final int var) { this.var = var; b.set(var); } } public class B { private int var = 0; public void set(final int var) { this.var = var; } }循环，则可以添加所需的数字标签列：

for

导入许多.txt文件，将它们与文件名

1 个答案: