添加新列并将行添加到新创建的列

Question

我有一个100x20矩阵现在我想添加一个新列，我必须做二十列的总和。我试图找到一个功能来做到这一点，可以任何人帮助

Answer 1

您正在寻找rowSums。 如果你的数据是m

m <- matrix(rexp(2000, rate=.1), ncol=20)
#creating totals
mtotal <- rowSums(m)
#adding totals to the matrix    
m <- cbind(m,mtotal)

Answer 2

您想要在矩阵中添加一个新列，其值是现有列的总和吗？

鉴于m中的矩阵，应该这样做：

newcol <- sapply(1:nrow(m), function(row) { sum(m[row,]) })
m <- cbind(m, newcol)

<强>更新

我不知道rowSums！正如@Rfan指出的那样，这可以简化为：

m <- cbind(m, rowSums(m))