just one more thing. Why are you defining the function over and over again...
On Wed, 31 Aug 2005, Hathaikan Chootrakool wrote: > I was wondering why this loop doesn't work! > > for (i in 1:k) > fnTr[i] <- function (p) 0.5* sum ( n*log(2*pi) - log(sd(i)^2) > +(logitp(i)-p)^2/sd(i)^2 ) > outTr[i]<- nlm (fnTr[i],p=c(10),hessian=TRUE) > minimumTr[i] <- outTr[i]$minimum > valueTr[i] <- outTr[i]$estimate > list (minimumTr[i],valueTr[i]) > > Has anyone can help me? > > Thank you very much > Hathaikan > > ______________________________________________ > R-help@stat.math.ethz.ch mailing list > https://stat.ethz.ch/mailman/listinfo/r-help > PLEASE do read the posting guide! http://www.R-project.org/posting-guide.html > ______________________________________________ R-help@stat.math.ethz.ch mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide! http://www.R-project.org/posting-guide.html