R/use_speed.R

Defines functions fit_speedglm

fit_speedglm <- function(x) {
  speedglm::speedglm(formula = x$formula,
                     data = x$data,
                     family = eval(x$family),
                     weights = x$weights)
}
kosukeimai/mediation documentation built on June 3, 2023, 12:14 a.m.