library(blorr)
library(magrittr)

Model

model <- glm(y ~ job + housing + contact + poutcome + duration + month +
             campaign + loan + marital + education + day + balance + previous, 
             data = bank_marketing, family = binomial(link = 'logit'))

Influence Diagnostics

blr_plot_diag_influence(model)

Leverage Diagnostics

blr_plot_diag_leverage(model)

Fitted Values Diagnostics

blr_plot_diag_fit(model)

DFBETAs Panel

blr_plot_dfbetas_panel(model)