Displaying 1 result from an estimated 1 matches for "tpsb".
Did you mean:
tps
2004 Mar 12
0
Basic questions on nls and bootstrap
...se
NULL
$call
bootstrap(x = tabMika, nboot = 10, theta = theta)
# as you can notify, the 10 estimations of C0 and k are the same value
(????!!!!!!), so, my program is wrong but I cannot find where is the problem.
# In a second time, I would like to fit the same data with a new function
Ct = C0*Tpsb. I did as follow and obtained the following results:
> Pat<-function(Tps,parm){
+ a<-parm[1]
+ b<-parm[2]
+ }
> PatSA.nls<-nls(SolA~a*(Tps^b),start=c(a=35, b=-1),tabMika)
Error in numericDeriv(form[[3]], names(ind), env) : Missing value or an
Infinity produced when evaluating...