在R中对矩阵执行这种入口操作的快速方法

Question

假设我有两个矩阵:大小为n × m的A和大小为n × 2的B

我想要得到一个大小为n × m的矩阵C，因此C[i,j] = A[i,j] * B[i,2] + B[i,1].

我如何在R中轻松快速地做到这一点?谢谢!

Answer 1

R>A <- matrix(1:20,5,4)
R>A
     [,1] [,2] [,3] [,4]
[1,]    1    6   11   16
[2,]    2    7   12   17
[3,]    3    8   13   18
[4,]    4    9   14   19
[5,]    5   10   15   20
R>B <- matrix(1:10,5,2)
R>B
     [,1] [,2]
[1,]    1    6
[2,]    2    7
[3,]    3    8
[4,]    4    9
[5,]    5   10
R>A * B[,2] + B[,1]
     [,1] [,2] [,3] [,4]
[1,]    7   37   67   97
[2,]   16   51   86  121
[3,]   27   67  107  147
[4,]   40   85  130  175
[5,]   55  105  155  205