按列名合并两个矩阵

Question

我有

mat1 <- matrix(c(1,2,3,4,5,6), ncol=2)
colnames(mat1) <- c("Soa","Nor")
mat2 <- matrix(c(1,0,1,1,0), nrow=1)
colnames(mat2) <- c("reman","jak","Soa","Alein","Nor")

我需要得到这个矩阵

Soa    Nor
1       4
2       5
3       6
1       0

我用这个，但不适用于列

merge(mat1,mat2, by="row.names", all = TRUE)

Answer 1

使用 时，这要简单得多rbind。mat2您可以提取with的相关列colnames(mat1)，然后将它们绑定在一起。

> rbind(mat1, mat2[, colnames(mat1)])
#     Soa Nor
#[1,]   1   4
#[2,]   2   5
#[3,]   3   6
#[4,]   1   0