[R] bootstrap function

[shu chen]

Hi, all,

When I ran the following code,

library (Design)

reri <- function(datsam)
{
fitlr <- glm(PTSDpy ~ toxo*PTE, family=binomial, data=datsam)

reri <- exp(fitlr$coef[2]+fitlr$coef[3]+fitlr$coef[4])-exp(fitlr$coef[2])
- exp(fitlr$coef[3]) + 1

}

summary.bootstrap(bootstrap(PTE.work, reri(PTE.work),B=10000,
group=PTE.work$PTSDpy), probs=c(0.025,0.5,0.975))


Error: could not find function "summary.bootstrap"


Does anyone know which package Functions "summary.bootstrap" and
"bootstrap" are located?

Thanks a lot.

Sue