列出没有唯一列的数据框

Question

我有这个循环来生成一些值

for (j in 1:2)  {
  table <- rep(data.frame( 
    matrix(c(letters[1:2], 
             sample(c(rep(1,100),0), size = 1),
             sample(c(rep(0,100),1), size = 1)),  ncol = 2) ), j)
}

我想得到这样的输出

X1 X2
a  1
b  0
a  1
b  1

获取 table 个字母，其中一列为数字，第二列为数字

我试过了

do.call(rbind, table)
data.frame(matrix(unlist(table), nrow=length(table), byrow=TRUE))

但我无法获取数据 table 中右列的值。

Answer 1

table 在每次迭代中都会更新。相反，我们可以使用 replicate 来创建 list

lst1 <- replicate(2,  data.frame( 
    matrix(c(letters[1:2], 
             sample(c(rep(1,100),0), size = 1),
             sample(c(rep(0,100),1), size = 1)),  ncol = 2) ), simplify = FALSE)
do.call(rbind, lst1)

列出没有唯一列的数据框

list to dataframe without unique columns

datatable

r

list

datatables