# Script for Binary Logistic Regression
# exponentiated coefficients (Odds Ratio) in the model GLM.1
exp(coef(GLM.1))
# 95% CI for exponentiated coefficients (CI of Odds Ratio) in the model GLM.1
exp(confint(GLM.1))
# The following script will compute the predicted probability
# using predictor variables AGE and SECTOR in the model GLM.1
predict(GLM.1, newdata=data.frame(AGE=25,SECTOR="Sector 1"), type="response")
# predicted values from all data cases used to build the model GLM.1
predict(GLM.1, type="response")
# residuals from all data cases used to build the model GLM.1
residuals(GLM.1, type="deviance")