[Ex4 - Q2] Ajout

Co-authored-by: Dimitrijevic <hugo.dimitrijevic@etu.u-pec.fr>

README.md

@@ -77,3 +77,5 @@ Les réponses aux questions des exercices sont situées dans les README des doss
 [![](https://cdn.discordapp.com/attachments/1063856358874689558/1109941208312184862/e4.png)](ex4/)
 
 [![](https://cdn.discordapp.com/attachments/1063856358874689558/1109941195934814299/1.png)](ex4/#q1)
+
+[![](https://cdn.discordapp.com/attachments/1063856358874689558/1109941194202566696/2.png)](ex4/#q2)

ex4/README.md

@@ -2,6 +2,7 @@
 
 ## Table des matières
 1. [Proportion de moins de 15 ans en fonction du taux de fécondité](#q1)
+2. [Taux de mortalité infantile en fonction du taux de natalité](#q2)
 
 ---
 
@@ -25,6 +26,36 @@ plot(X,a*X+b);
 
 ![Proportion de moins de 15 ans en fonction du taux de fécondité](img/ex4-1.png)
 
+---
+
+### Question 2 : Taux de mortalité infantile en fonction du taux de natalité {#q2}
+
+> Afficher le taux de mortalité infantile en fonction du taux de natalité. Faites (et dessiner) une regression linéaire. 
+   Quel est le coefficient de corrélation ? Que peut-on dire ? Y'a-t-il une relation de causalité entre les deux ?
+
+**[Script Scilab](scripts/ex4-2.sce) :**
+
+```scilab
+X = mtlb_t(data(:,4));
+Y = mtlb_t(data(:,7));
+
+plot2d(X,Y,-1);
+
+[a,b] = reglin(X, Y);
+plot(X,a*X+b);
+
+coefficient_correlation = correl(X,Y);
+```
+
+**Résultat :**
+
+![Taux de mortalité infantile en fonction du taux de natalité](img/ex4-2.png)
+
+- Coefficient de correlation : 0.86
+
+Le coefficient de correlation, qui est à l'image du graphe obtenu, nous montre qu'il y à une causalité entre les deux. PLus le taux de natalité est élevé plus le taux de mortalité infantile est élevé, ce qui est logique.
+
+
 ---
 
 [⬅️](../ex3/ "Exercice précédent (Exercice 3)") | [🏠](../ "Retour au sommaire")

ex4/scripts/ex4-2.sce

@@ -0,0 +1,22 @@
+data = csvRead("data.csv");
+
+// Pour réaliser la regression linaire du taux de mortalité infantile en fonction du taux de natalité 
+// on reprend le code la question précédente mais en utilisant les collones correspondantes 
+
+X = mtlb_t(data(:,4)); // natalité
+Y = mtlb_t(data(:,7)); // mortalité infantile
+
+plot2d(X,Y,-1);
+
+[a,b] = reglin(X, Y);
+plot(X,a*X+b);
+title("Regression lineaire du taux de mortalité infantile en fonction du taux de natalité");
+xlabel("Taux de natalité");
+ylabel("Taux de mortalité infantile");
+xs2png(0,"ex4/img/ex4-2.png");
+
+// Calcul de coefficient de correlation
+
+coefficient_correlation = correl(X,Y);
+
+mprintf("Coefficient de correlation : %.2f\n", coefficient_correlation);