# NOT RUN {
if (require("see")) {
  # creating a model
  model <- glm(vs ~ wt + mpg, data = mtcars, family = "binomial")
  # this will automatically plot the results
  (result <- binned_residuals(model))
  # if you assign results to an object, you can also look at the dataframe
  as.data.frame(result)
}
# }
Run the code above in your browser using DataLab