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.

Reply via email to