Internal, not usually called directly
metrics_hoslem(y, yhat, g = 10, digits = c(2, 3))
https://github.com/psolymos/ResourceSelection/blob/master/R/hoslem.test.R
Character string of chi-sq result, df, and p-value. Significant p-value suggests poor fit.
fit = glm(mort_5yr~age.factor+extent.factor, data=colon_s, family="binomial")
metrics_hoslem(fit$y, fit$fitted)
#> [1] "Chi-sq(8) 1.18 (p=0.997)"