modif premier glm

module4/src_R_challenger.Rmd

@@ -52,7 +52,7 @@ logistic_reg = glm(data=data, Malfunction/Count ~ Temperature, weights=Count,
 summary(logistic_reg)
 ```
 
-The maximum likelyhood estimator of the intercept and of Temperature are thus $\hat{\alpha}=5.0849$ and $\hat{\beta}=-0.1156$ and their standard errors are $s_{\hat{\alpha}} = 3.052$ and $s_{\hat{\beta}} = 0.04702$. The Residual deviance corresponds to the Goodness of fit $G^2=18.086$ with 21 degrees of freedom. **I have therefore managed to replicate the results of the Dalal *et al.* article**.
+The maximum likelyhood estimator of the intercept and of Temperature are thus $\hat{\alpha}=5.08498$ and $\hat{\beta}=-0.11560$ and their standard errors are $s_{\hat{\alpha}} = 3.05247$ and $s_{\hat{\beta}} = 0.04702$. The Residual deviance corresponds to the Goodness of fit $G^2=18.086$ with 21 degrees of freedom. **I have therefore managed to replicate the results of the Dalal *et al.* article**.
 
 # Predicting failure probability
 The temperature when launching the shuttle was 31°F. Let's try to