GOUACHE David <D.GOUACHE <at> arvalisinstitutduvegetal.fr> writes:
... > This is my original function : > > comp.fit.2<-function(tab) > { > fit.log<-nls(surf.vert.tot ~ 100/(1+exp(((log(81))/a)*(sum.T.levee-b))), start=list( ... > I've thought of just storing the 3 model results in a list, and then going through each model object, > but even then, when I have a convergence problem, the function breaks off. try and catch as Gabor suggested, but nlslist in package nlme does this for you the easy way. Dieter ______________________________________________ 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 and provide commented, minimal, self-contained, reproducible code.