Displaying 2 results from an estimated 2 matches for "bootsola".
Did you mean:
boothole
2004 Apr 09
1
bootstrap function coefficients
....' 0.1 ` ' 1
Residual standard error: 2.584 on 32 degrees of freedom
Correlation of Parameter Estimates:
C0
k 0.7101
# Second, I try to use bootstrap to get the 10 estimates of k and C0
> library(bootstrap)
> theta<-function(tabMika){coef(eval(DegSA.nls$call))}
> bootSolA.nls<-bootstrap(tabMika,10,theta)
Warning message:
multi-argument returns are deprecated in: return(thetastar, func.thetastar,
jack.boot.val, jack.boot.se,
> bootSolA.nls
$thetastar
[,1] [,2] [,3] [,4] [,5] [,6]
C0 25.68210358 25.68210358 25.68...
2004 Mar 12
0
Basic questions on nls and bootstrap
...ink (or may be hope) that it is OK.
#Then, I would like to use bootstrap function to obtain 10 estimations
(more of course but 10 is retained for this example) of the parameters C0
and t. I use this way:
> library(bootstrap)
> theta<-function(tabMika){coef(eval(DegSA.nls$call))}
> bootSolA.nls<-bootstrap(tabMika,10,theta)
Warning message:
multi-argument returns are deprecated in: return(thetastar, func.thetastar,
jack.boot.val, jack.boot.se,
> bootSolA.nls
$thetastar
[,1] [,2] [,3] [,4] [,5] [,6]
C0 25.68210358 25.68210358 25.6...