r - 两个向量相乘 - 我想要一个标量，但我得到一个向量？

Question

这是我的代码:

a <-c(1,2,3)
b <-t(a)
print(a*b)

我期望结果为 14，因为列向量乘以具有拟合尺寸的行向量应该是标量。

但是，我得到:

print (a*t(a))

 [,1] [,2] [,3]

[1,]    1    4    9

因此是部分和而不是全部和。我该如何解决这个问题？

Answer 1

两个问题，乘法顺序错误，乘法函数错误。

> print(t(a)%*%a)
     [,1]
[1,]   14

等价:

> a=matrix(c(1,2,3),ncol=3)
> print (a %*% t(a))
     [,1]
[1,]   14

这里a是一个1行3列的矩阵。

参见 ?"%*%" 和 ?"*"