## Example 1: Linear model
data(data_linear_model)
X <- data_linear_model$X
y <- data_linear_model$y
mod.idx <- data_linear_model$mod.idx
test <- mglm.test(X = X, y = y, mod.idx = mod.idx, family = "gaussian",
iter = TRUE, penalty = "SCAD", tune = "bic",
conf.level = 0.95, CI.type = "one.sided")
summary(test)
## Example 2: Logistic regression
data(data_logistic_model)
X <- data_logistic_model$X
y <- data_logistic_model$y
mod.idx <- data_logistic_model$mod.idx
test <- mglm.test(X = X, y = y, mod.idx = mod.idx, family = "binomial",
iter = TRUE, penalty = "SCAD", tune = "bic",
conf.level = 0.95, CI.type = "two.sided")
sum.test <- summary(test)
Run the code above in your browser using DataLab