Displaying 1 result from an estimated 1 matches for "sqrtfemphoto".
2011 Mar 19
0
Problems using NLS in conjunction with non-parameteric bootstrapping
...trol = list(maxiter =
10000, minFactor=1/20048),
trace = T)
summary(NlMFunc1)
logLik(NlMFunc1)
#Generate non-parametric bootstrap estimates of alpha and beta
#using bootstrapping
################################################
BootF=function (data,i){
# take a random sample of size 18 from a SqRtFemPhoto
# sample with replacement
d <- data[i,]
NlmResampF<- function(x, a, b) {(a*x)/(b+x)}
NlmResampF <- nls(y ~ NlmResampF (x, alpha, beta),
data = d, start = list(alpha = 10, beta = 1),
control = list(maxiter = 10000, minFactor=1/20048,
trace = T))
c(logLik(NlmResampF ), coef(Nl...