argmin 的输出不能更改为数字

Question

对于以下示例：

    f<-function(x,y){x^2+y^2}
mm<-c(0.2,0.5,0.3)

inputs<- list(c(1,0,0),c(0,1,0),c(0,0,1))
outputs<-mapply(f,inputs,mm )
argmin<-inputs[which.min(outputs)]
argmin-mm

我收到错误： argmin - mm 中的错误：二元运算符的非数字参数

我想知道，我怎样才能让 argmin 是一个数字，我可以执行类似的操作：

argmin +mm 等等

我尝试将 as.numeric 设置为 argmin，但我收到另一个警告：

(list) 对象无法强制键入 'double'

Answer 1

inputs 是一个列表，mm 是一个向量

尝试

unlist(argmin) - mm

或

armign[[1]] - mm

argmin 的输出不能更改为数字

output of argmin cannot be changed to numeric

r

mapply