R中的乘法矩阵

Question

我有一个矩阵a有24行44列，另一个b有44行和一列。我想将矩阵b的第一行与矩阵a的整列相乘，矩阵b的第二行与矩阵a的整列相乘等等。我怎么能这样做？

Answer 1

我们可以复制第二个矩阵中的元素（＆＃39; m2＆＃39;），使长度与＆＃39; m1＆＃39;相同。然后进行乘法运算。

m1*m2[col(m1)]

为了复制元素，我们使用col，它返回矩阵列的数字索引（＆＃39; m1＆＃39;）

 col(m1)
 #     [,1] [,2] [,3] [,4]
 #[1,]    1    2    3    4
 #[2,]    1    2    3    4
 #[3,]    1    2    3    4
 #[4,]    1    2    3    4
 #[5,]    1    2    3    4

通过m2[col(m1)]，＆＃39; m2＆＃39;中的第一个元素即row1 column1元素被复制5次，第二次被复制5次，依此类推。

 m2[col(m1)]
 #[1] 1 1 1 1 1 2 2 2 2 2 3 3 3 3 3 4 4 4 4 4

数据

m1 <- matrix(1:20, ncol=4)
m2 <- matrix(1:4, nrow=4)

Answer 2

此替代方案使用矢量回收：

t(t(m1) * as.vector(m2))

由于矢量以相同的方式循环（矩阵填充），我们需要首先转置m1，然后再转置结果。