R-如何在for循环中向列数据框添加列？

Question

我的数据看起来像这样， 1000个文件具有相同的数据格式。

R_338   4
R_341   1
R_471   1
R_491   4
R_494   1
R_642   0
M_218   5
M_222   5
M_292   0
p_185   5
p_187   5
A_308   0
A_473   1

我真的很感激，如果有人可以指导我如何编写R脚本，以便我可以合并所有1000个文件，只保留第一列一次，其余0f附加1000列：

示例输出：

R_338   4   5   6   7   8   9   10  11
R_341   1   1   1   1   1   1   1   1
R_471   1   1   0   1   1   1   2   1
R_491   4   4   4   4   4   4   2   0
R_494   1   1   1   1   1   1   1   1
R_642   0   1   0   9   1   1   2   1
M_218   5   5   5   9   5   5   5   9
M_222   5   5   5   5   5   5   5   5
M_292   0   5   1   1   1   1   1   1
p_185   5   5   5   6   5   5   5   5
p_187   5   9   5   5   5   5   3   5
A_308   0   4   4   4   2   4   4   4
A_473   1   1   1   1   0   1   1   0

Answer 1

假设您有一个包含文件名的字符向量。然后我想

L <- lapply(file.names,read.table,...)  ## where ... represents additional 
                                        ## arguments to read.table()
cbind(L[[1]],do.call(cbind,lapply(L[-1],"[[",2)))

可能有用。

Answer 2

这取决于您所拥有的具体细节，但cbind或merge可能会为您提供所需的信息。