# NOT RUN {
# load the sample dataset
data(log_regr_data)
# fit a logistic regression model, storing the results into an object called 'model'
model <- glm(admit ~ gre + gpa + rank, data = log_regr_data, family = "binomial")
aucadj(data=log_regr_data, fit=model, B=200)
# }
Run the code above in your browser using DataCamp Workspace