r - 使用外部函数

Question

我在使用外部函数时遇到困难。我查看了一些线程，但无法找到解决方案。

我有一个矩阵，价格，包含以下信息:25 26我使用以下外部函数将这些数字相乘:

a = outer(prices[1,1:2],prices[1,1:2],FUN ="*")

这给了我以下错误:

Error in as.vector(X) %*% t(as.vector(Y)) : 
requires numeric/complex matrix/vector arguments

但是，如果我做完全相同的事情，但直接使用数字，它会按照我的意愿工作:

a = outer(c(25,26),c(25,26),FUN ="*")

并返回一个带有产品的 2x2 矩阵。

任何帮助将不胜感激。

Answer 1

您的价格矩阵显然是 data.frame而不是 matrix .您可以更改它:

prices <- as.matrix(prices)
a <- outer(prices[1,1:2],prices[1,1:2],FUN ="*")

或者您可以在使用时转换为数字:

a <- outer(as.numeric(prices[1,1:2]),as.numeric(prices[1,1:2]),FUN ="*")