View source: R/bootstrap_model.R
bootstrap_model | R Documentation |
Bootstrap a statistical model n times to return a data frame of estimates.
bootstrap_model(model, iterations = 1000, ...)
## Default S3 method:
bootstrap_model(
model,
iterations = 1000,
type = "ordinary",
parallel = c("no", "multicore", "snow"),
n_cpus = 1,
verbose = FALSE,
...
)
## S3 method for class 'merMod'
bootstrap_model(
model,
iterations = 1000,
type = "parametric",
parallel = c("no", "multicore", "snow"),
n_cpus = 1,
cluster = NULL,
verbose = FALSE,
...
)
model |
Statistical model. |
iterations |
The number of draws to simulate/bootstrap. |
... |
Arguments passed to or from other methods. |
type |
Character string specifying the type of bootstrap. For mixed models
of class |
parallel |
The type of parallel operation to be used (if any). |
n_cpus |
Number of processes to be used in parallel operation. |
verbose |
Toggle warnings and messages. |
cluster |
Optional cluster when |
By default, boot::boot()
is used to generate bootstraps from
the model data, which are then used to update()
the model, i.e. refit
the model with the bootstrapped samples. For merMod
objects (lme4)
or models from glmmTMB, the lme4::bootMer()
function is used to
obtain bootstrapped samples. bootstrap_parameters()
summarizes the
bootstrapped model estimates.
A data frame of bootstrapped estimates.
The output can be passed directly to the various functions from the
emmeans package, to obtain bootstrapped estimates, contrasts, simple
slopes, etc. and their confidence intervals. These can then be passed to
model_parameter()
to obtain standard errors, p-values, etc. (see
example).
Note that that p-values returned here are estimated under the assumption of translation equivariance: that shape of the sampling distribution is unaffected by the null being true or not. If this assumption does not hold, p-values can be biased, and it is suggested to use proper permutation tests to obtain non-parametric p-values.
bootstrap_parameters()
, simulate_model()
, simulate_parameters()
model <- lm(mpg ~ wt + factor(cyl), data = mtcars)
b <- bootstrap_model(model)
print(head(b))
est <- emmeans::emmeans(b, consec ~ cyl)
print(model_parameters(est))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.