Displaying 1 result from an estimated 1 matches for "seqx".
Did you mean:
seq
2012 Jun 28
1
add constraints to nls or use another function
....03,F=1), control=list(maxiter=200,
tol=0.01)))
# Coefficients :
# A B C
D F
# -0.06098888 0.48632458 0.89397997 0.02978641 5.00743745
plot(dftest$x,dftest$y,pch=20, col="red", xlim=c(0,1.2))
seqx<-seq(0,1.2,by=0.0125)
# There must me a way with predict, but I didn't manage to use it
points(seqx,nlsfit[5]+nlsfit[1]*(seqx-1)+nlsfit[2]*log(seqx)+nlsfit[3]*(seqx-1)*(seqx-1)+nlsfit[4]*log(seqx)*log(seqx),pch=20,col="black",type="l",lwd=2)
#The result of the fit :
htt...