Displaying 1 result from an estimated 1 matches for "ptol".
Did you mean:
pool
2012 Oct 18
3
Upper limit in nlsLM not working as expected
...lues for fitting
st2<-data.frame(
y0=0,
A=0.0001,
w=0.055,
xc=0.28
)
#Fit function to data
fit<-nlsLM(y ~ y0 + 2*(A/pi)*w/(4*(x-xc)^2+w^2),
control=nls.lm.control(
factor=100,
maxiter=1024,
ftol = .Machine$double.eps,
ptol = .Machine$double.eps
),
data=data,
na.action=na.exclude,
start=st2,
algorith='LM',
lower=c(-0.0001,-1e-8,0.05,0.2),
#upper=c(1e-6,0.003,0.08,0.35),
upper=c(Inf,Inf,0.07,Inf),
trace=F...