数组与矩阵的元素相乘

Question

在R中，我可以在矩阵和（共形）向量之间进行分段乘法，例如：

X <- matrix(c(1, 2, 3, 4), nrow = 2)
a <- c(0, 1)
X * a

矩阵的每一行都与相应的向量元素相乘。我也可以对维度大于2的数组做同样的事情：

XX <- array(X, dim = c(2, 2, 2))
a <- c(0, 1)
XX * a

同样，每一行都与相应的向量元素相乘。我能为3d阵列和2d矩阵做类似的事情吗？我只想让数组中的每个子矩阵都按元素乘以一个矩阵。

Answer 1

通过首先从较小维的矩阵构造一个适当的数组，然后执行元素乘法，可以实现“分片”乘法（或者任何算术运算）。在你的例子中：

X <- 1:8
XX <- array(X, dim = c(2, 2, 2))
a <- c(0, 1)

# construct array for point-wise operation
expandeda <- array(a, dim=dim(XX))

XX * expandeda

这样做的结果表明，如你所说，a的单个元素是按行应用的（即应用于数组的第一个维度）：

, , 1

     [,1] [,2]
[1,]    0    0
[2,]    2    4

, , 2

     [,1] [,2]
[1,]    0    0
[2,]    6    8

使用array（a，dim=dim（XX））构造合适的数组不仅适用于3d和2d矩阵，而且适用于数组的任何维度，只要length（a）==dim（XX）[1]。

Answer 2

你不能把它和2d矩阵相乘，但你可以试试这个XX*c（1,2,3,4）