Try this:
growthBoot <- replicate(3, growth[sample(9,12,replace=T),], simplify =
FALSE)
lapply(growthBoot, nls, formula = Length ~ Linf * (1 - exp(-K * (Age -
to))), start = par)
On Wed, Sep 29, 2010 at 4:56 PM, Michael Larkin wrote:
> I apologize if this comes across as confusing. I will try t
Mike,
Without completely knowing your end game with these questions and this
procedure it does seem like you are "re-inventing the wheel" here. If that is
true and given the nls() fit that you are using I would suggest that you look
at boot.case() in the alr3 package or nlsBoot() in the nlstoo
2 matches
Mail list logo