if (FALSE) {
requireNamespace("fwildclusterboot")
data(voters)
lm_fit <- lm(
proposition_vote ~ treatment + ideology1 + log_income + Q1_immigration,
data = voters
)
mboot <- mboottest(
object = lm_fit,
clustid = "group_id1",
B = 999,
R = R
)
generics::glance(mboot)
}
Run the code above in your browser using DataLab