diff --git a/module2/exo5/exo5_fr.Rmd b/module2/exo5/exo5_fr.Rmd
index f7a9f2d0b677556f1a83aec158d3d3958878d913..cacd94cecbf4fab7f14c4ad7bb99c33935d7f439 100644
--- a/module2/exo5/exo5_fr.Rmd
+++ b/module2/exo5/exo5_fr.Rmd
@@ -61,7 +61,7 @@ tempv = seq(from=30, to=90, by = .5)
 rmv <- predict(logistic_reg,list(Temperature=tempv),type="response")
 rmv
 ```
-La probabilité de défaillance d'est donc de $p=0.8343$ d'aprèss le modèle. 
+La probabilité de défaillance est donc de $p=0.8343$ d'aprèss le modèle. 
 ```{r}
 plot(tempv,rmv,type="l",ylim=c(0,1))
 points(data=data, Malfunction/Count ~ Temperature)