您拼错了两个参数。尝试编写loglikelihood代替loglik和x代替X,它将起作用。
loglikelihood
loglik
x
X
> optimize(f=loglikelihood,x=x,interval=c(0,100),maximum=T) $maximum [1] 20.86679 $objective [1] -157.6814