R language various logistic regression common conditions iptw

#【 Ordinary logistic Return to 】
library(reportReg)
Match$SYPL <- as.factor(Match$SYPL)
model0=glm(zq101~SYPL,data=Match,family=binomial(),)
reportReg(model0)
summary(model0)

#【IPTW Of logistic Return to 】
data$SYPL <- as.factor(data$SYPL)
model1=glm(zq101~SYPL,data=data,family=binomial(),weights=mw1)
reportReg(model1)

#【PSM】 Of 【 Conditions logistic Return to 】
??clogit
library(survival)
model2 <- clogit(zq101~SYPL + strata(group), data=Match)
reportReg(model2)