Умножение столбцов в матрице на скаляр в R

Предположим, у меня есть следующее:

mat <- matrix(1:9, ncol = 3)

     [,1] [,2] [,3]
[1,]    1    4    7
[2,]    2    5    8
[3,]    3    6    9

Теперь я хотел бы умножить каждый столбец матрицы на скаляр

scalar = c(1,2,3)

Я хотел бы, чтобы первый элемент скаляра умножил первый столбец, второй элемент умножил второй столбец, а третий скаляр - третий столбец.

Чтобы получить следующий результат

     [,1] [,2] [,3]
[1,]    1    8    21
[2,]    2    10   24
[3,]    3    12   27

Может ли кто-нибудь помочь мне с этим?


r matrix vector scalar
person Wietze    schedule 27.06.2021    source источник

Ответы (2)


arrow_upward
3
arrow_downward

Другой базовый вариант R с использованием %*% и diag

> mat %*% diag(scalar)
     [,1] [,2] [,3]
[1,]    1    8   21
[2,]    2   10   24
[3,]    3   12   27
person ThomasIsCoding    schedule 27.06.2021

arrow_upward
2
arrow_downward

Мы копируем «скаляр» и умножаем

mat * scalar[col(mat)]

Или с sweep

sweep(mat, 2,  scalar, `*`)
   [,1] [,2] [,3]
[1,]    1    8   21
[2,]    2   10   24
[3,]    3   12   27
person akrun    schedule 27.06.2021