SAE_S2.04/Exo4/Question2.sce

19 lines
646 B
Scilab
Raw Normal View History

2023-05-20 19:03:33 +02:00
//Taux de natalité
tauxNatalite = data(:, 4);
//Taux de mortalité infantile
tauxMortaliteInfantile = data(:, 7);
//regression
[x, y] = reglin(tauxNatalite', tauxMortaliteInfantile');
//affichage
plot2d(tauxNatalite, tauxMortaliteInfantile, -1);
plot(tauxNatalite', x*tauxNatalite' + y);
xtitle("Taux de mortalité infantile en fonction du taux de natalité", "Taux de natalité (pour 1000 habitants)", "Taux de mortalité infantile (pour 1000 naissances)");
legend(["Nuage de points", "Régression linéaire"]);
//coefficient de correlation
r = correl(tauxNatalite, tauxMortaliteInfantile);
mprintf("Coefficient de correlation : %f\n", r);