object <- glm(
formula = vs ~ wt + disp,
family = "binomial",
data = mtcars
)
def <- list("exp(wt)", "exp(disp)")
out <- DeltaGeneric(
object = object,
def = def,
alpha = 0.05
)
summary(out)
Run the code above in your browser using DataLab