小白刚接触R不久，要做一个用极大似然估计求参数的作业，在用nlminb时候发现参数的初值不会求。。。求大神指点！顺便请指点下错误之处！谢谢啦！作业是这个样子的：

[url=]entropy-hw1.pdf[/url]

数据：[url=][/url]

代码：
> ut=read.table("1.txt")

> gg=log(ut)
> View(gg)
> acf(gg)
> pacf(gg)
> Box.test(gg,lag=15,type="Ljung")
> library("fGarch")

> m1=garchFit(~garch(2,0),data=gg,trace=F)
> summary(m1)

> m2=garchFit(~garch(1,0),data=gg,trace=F)
> summary(m2)

> plot(m1)
> plot(m2)

> bt=var(gg)



> LL<-function(params,ut){
+ f<-exp(-(ut)*(exp(params[1]+params[2]*abs(log((ut)/(bt)))+params[3]*log((ut)/(bt))+params[4]*log(bt)))^(-2))
+ ll<-sum(log(f1))
+ return(-log(ll))
+ }

mp<-optim(par=c(),LL,data=ut)
求问四个的参数的初值怎么求呢？