поэлементного умножения между матрицей и матрицей

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

вы не можете умножить его 2d матрицы, но вы можете попробовать это XX*c(1,2,3,4)

Answer 2

можно достичь «piece'-мудрое умножение (или любую арифметическую операцию, на самом деле), сначала построив соответствующий массив из матрица меньшего размера, а затем выполнение элементарной операции. В вашем примере:

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].