Logistics regression有着非常好的模型解释,
以下为本人总结的在adult数据集上的模型解释步骤
##第1步:load data
experiment_data<-read.table(‘C:\Users\data\adult.txt’,sep = ‘,’, header = TRUE)
colnames(experiment_data) <- c(“age30”,“age60”,“private”,“self_emp”,“gov”,“edu12”,“edu9”,“prof”,“white”,“male”,“hours50”,“hours30”,“us”,“outcome”)
M<-ncol(experiment_data)
Y<-experiment_data[,14]
obsX<-experiment_data[,-14]
############################################### Algorithm One ###################################################
Aim is to explanatory the model
logistic regression model
##第2步:load data
glm.fit <- glm(Y ~ age30 + edu12 + edu9 + prof + white + male + hours50 + hours30,
experiment_data, family = binomial(link = ‘logit’))