# \donttest{
datafile = system.file("extdata", "binary.csv", package = "packDAMipd")
mydata <- read.csv(datafile)
results_logit <- use_generalised_linear_model("admit",dataset = mydata,
indep_var = "gre", family = "binomial", covariates = NA,
interaction = FALSE,naaction = "na.omit", link = NA)
do_diagnostic_glm("glm", results_logit$fit, results_logit$fit$call,
"admit",mydata, "gre", covariates = NA, interaction = FALSE)
# }
Run the code above in your browser using DataLab