R错误：无法强制关闭两倍

Question

我正在尝试为R中的我的一个朋友建立一个优化的例子，但是正如标题中所述，我遇到了以下错误。我看到了另一个问题，答案相似，但这并没有启发。非常感谢您的帮助，谢谢。

  

optim（ll，method =“ BFGS”）中的错误：   无法将类型'closure'强制转换为类型'double'的向量

dados <- rbinom(n = 40, size = 5, prob = 0.1)
cov <- rep(1, times = 40)
n <- 40

ll <-  function(k){
        fn_dados <- dados*cov - n*cov*(exp(cov*k)/(1 + exp(cov*k))) 
        loglike <- sum(fn_dados)
          return(loglike)
}

optim(ll, method = 'BFGS')

Answer 1

看起来您只是缺少了一些参数，所以您对传递给它的内容感到困惑def print_num(num, info): if num > 0: print_num(num-1,info) print(info) print(num) 。

optim()

optim(par=c(0),fn=ll, method = 'BFGS')