矩阵的行乘积和矩阵的列和

Ku-*_*ala 6 r matrix

我有一个大小为TxR的矩阵,我正在寻找一个命令来做行的产品(返回产品的1 x R向量).之后我想总结一下列,即总结R项.

在Matlab中,这将完成类似于这个总和(prod(A,1),2),但我不知道R中的代码.

我希望它有意义.

谢谢

jim*_*myb 11

sum(apply(A, 1, prod))
Run Code Online (Sandbox Code Playgroud)

在行之间应用prod函数(1是边距),对结果求和.


Rei*_*son 8

在基地R:

mat <- matrix(c(1,2,3,
                4,5,6,
                7,8,9), byrow = TRUE, ncol = 3)

R <- apply(mat, 1, prod)
R
sum(R)

R> R
[1]   6 120 504
R> sum(R)
[1] 630
Run Code Online (Sandbox Code Playgroud)

有一个很好的替代上CRAN称为matrixStats其目的添加的其它矩阵函数快速版本来补充rowSums,colSums在基R.(和它们的平均当量)

install.packages("matrixStats") ## install it from CRAN

## load matrixStats
library("matrixStats")
rowProds(mat)

R> rowProds(mat)
[1]   6 120 504
R> sum(rowProds(mat))
[1] 630
Run Code Online (Sandbox Code Playgroud)