R GLM模型功能错误

Question

与使用木匠胶水制作的接头相比，使用白色胶水制作的接头 的接头破胶几率更可能多少倍， 控制质量，压力和夹紧？提供95％CI 这个数量以及

有两个白色胶水和木工胶胶水变

fit3 <- glm(breakType ~ glue + quality + stress + clamp, family = "binomial",data = joints2) 
exp(coef(fit3)) 
exp(confint(fit3)) 

我的代码返回错误，我无法找到哪一部分是错误的

exp（confint（fit3））时发生错误 ：等待分析完成... 约（sp $ y，sp $ x，xout = cutoff）中的错误： 需要至少两个非NA值插入 另外：有50个或更多警告（使用警告（）以看到第50）

Answer 1

library(ggplot2) # Getting data table mpg for example 
# Use class as dichotomous variable (must subset) 
newData$ms = ifelse(newData$class == 'misize',1,0) 

# Fit Model (logistic Regression) 
fit = glm(ms ~ cty + cyl, family = "binomial", data = newData) 
exp(coef(fit)) 

summary(fit) # to get estimates and standard errors 

因为这看起来像一个硬件问题，我想你可以用标准的错误，并估计自己自己构建CI从summary :)