R语言从列表中提取合并？

Question

假设一个列表list_x由10不同的个5乘3的矩阵构成，现想把
每个矩阵的第一列提取出来，纵向合并成一个新的矩阵
每个矩阵的第二列提取出来，纵向合并成一个新的矩阵
每个矩阵的第三列提取出来，纵向合并成一个新的矩阵
我就想到这，不会了。。。
sapply(list_X, function(x) x[,1])

请高人指教，谢谢！

Answer 1

for(i in 1:5){
data[[i]]<-do.call('rbind',lapply(data_raw,function(x) x[[i]]))
}