if (FALSE) {
# Load leukemia remission data
data(remission)
# Run stepwise logistic regression
formula <- remiss ~ .
result <- stepwise(
formula = formula,
data = remission,
type = "logit",
strategy = c("forward", "bidirection"),
metric = c("AIC", "BIC")
)
# Generate reports in multiple formats
report(
x = result,
report_name = "leukemia_analysis",
format = c("html", "docx")
)
}
Run the code above in your browser using DataLab