r - 矩阵与向量的元素乘积

代替通常的矩阵乘法，我需要按元素进行运算。以下工作正常:

# this works
Bmat <- structure(c(3L, 3L, 10L, 3L, 4L, 10L, 5L, 8L, 8L, 8L, 3L, 8L, 8L, 2L, 6L, 10L, 2L, 8L, 3L, 9L), .Dim = c(10L, 2L))
yvec <- c(2, 2, 2, 2, 2, 2, 2, 2, 2, 2)
Bmat * yvec
#       [,1] [,2]
#  [1,]    6    6
#  [2,]    6   16
#  [3,]   20   16
#  [4,]    6    4
#  [5,]    8   12
#  [6,]   20   20
#  [7,]   10    4
#  [8,]   16   16
#  [9,]   16    6
# [10,]   16   18

但是，以下操作失败:

# this fails
Amat <- structure(c(1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0), .Dim = c(10L, 2L))
xvec <- structure(c(1.83475682418716, 1.48154883122634, 1, 1, 1, 1, 1, 1, 1, 1), .Dim = c(10L, 1L))
Amat * xvec
#Fehler in Amat * xvec : nicht passende Arrays

这是为什么？与Bmat是一个整数矩阵有关系吗？如何使第二个代码起作用？

最佳答案

class(xvec)
[1] "matrix"

dim(xvec)
[1] 10  1

class(Amat)
[1] "matrix"

dim(Amat)
[1] 10  2

只有当两个矩阵的维数相同时，才可以在它们之间进行按元素的乘法。因此，解决方案是将xvec转换为向量。尝试

Amat * c(xvec)
#OR
Amat * as.vector(xvec)

关于r - 矩阵与向量的元素乘积，我们在Stack Overflow上找到一个类似的问题：https://stackoverflow.com/questions/43283459/