5.0 Logistic_multivariate

#载入包
library(epiDisplay)
#多因素logistic


#建模1

fit<-glm(formula = MACE ~ Age +Killip+Hypertention+Dyslipidaemia+Hhcy +HF+CI+PHD+Sent+VD3LM+NODM   
         +LDLC+BUN+eGFR+NEUT+AST+LVEF+LAD+InhP2Y12+TC+MDP
         , family = binomial(), 
         data = Vdata2)

fit<-glm(formula = MACE ~ Age +Killip +Hypertention+Hhcy +HF +Sent+VD3LM
         +LDLC+LVEF_F+InhP2Y12
         , family = binomial(), 
         data = Vdata2)

#查看多因素结果
logistic.display(fit)



#####

#LVEF划分＜50；；≥50   √
Vdata2$LVEF_F<- cut(Vdata2$LVEF, breaks = c(-Inf, 49.9, Inf),
                    labels = c("0", "1"), include.lowest = TRUE)

summary(Vdata2)



fit<-glm(formula = MACE ~ Age +Killip +Hypertention+Hhcy +HF +Sent+VD3LM
         +LDLC+LVEF_F
         , family = binomial(), 
         data = Vdata2)

#查看多因素最终结果
logistic.display(fit)