DEoptim错误消息：x [，-1]：不正确的尺寸数

Question

当我尝试优化函数中的几个参数时，遇到了上述错误消息，我试图缩小参数值的范围，但错误仍然存​​在。 您能告诉我这种错误的原因是什么？ 顺便说一句，当我使用MCGA的GA软件包时，我实际上重现了相同的错误消息。 非常感谢！ 码：

c<-1
e<-2
f<-3
g<-4
posneg.ratio <- function(x) {
lambda_a<-x[1]
lambda_b<-c(x[2],x[3])
lambda_c<-x[4]
random_effect<-factor_comp (lambda_a,lambda_b,lambda_c,e,f,g)
m<-random_effect$factor_a$b1
pos<-abs(sum(m > 0])
neg<-abs(sum(m < 0])
n<-neg/pos 
return(n)
}
lower = c(0.5,0.09,0.05,7)
upper = c(0.9,0.2,0.1,12)
DEoptim(posneg.ratio,lower,upper)

Answer 1

谢谢大家的回答，错误实际上来自我的函数定义function * （x） *，当我改用function（xe时，x弄乱了在其余函数中定义的x变量之一，这很糟糕。 ）和xe [1]，xe [2] ...错误消失。 对于我来说，不要用“ x”，“ y”，“ z”，“ n”这些常用名称定义任何变量也是一个很好的教训。