SAE_S2.04/Exo3/Question4.sce

38 lines
1.5 KiB
Scilab

//Afrique
tauxNaissanceAfrique = mean(data(1:57, 4));
tauxMortAfrique = mean(data(1:57, 5));
tauxAccroissementAfrique = tauxNaissanceAfrique - tauxMortAfrique;
//Amérique du Nord
tauxNaissanceAmeriqueNord = mean(data(58:86, 4));
tauxMortAmeriqueNord = mean(data(58:86, 5));
tauxAccroissementAmeriqueNord = tauxNaissanceAmeriqueNord - tauxMortAmeriqueNord;
//Amérique du Sud
tauxNaissanceAmeriqueSud = mean(data(87:99, 4));
tauxMortAmeriqueSud = mean(data(87:99, 5));
tauxAccroissementAmeriqueSud = tauxNaissanceAmeriqueSud - tauxMortAmeriqueSud;
//Asie
tauxNaissanceAsie = mean(data(100:150, 4));
tauxMortAsie = mean(data(100:150, 5));
tauxAccroissementAsie = tauxNaissanceAsie - tauxMortAsie;
//Europe
tauxNaissanceEurope = mean(data(151:193, 4));
tauxMortEurope = mean(data(151:193, 5));
tauxAccroissementEurope = tauxNaissanceEurope - tauxMortEurope;
//Océanie
tauxNaissanceOceanie = mean(data(194:207, 4));
tauxMortOceanie = mean(data(194:207, 5));
tauxAccroissementOceanie = tauxNaissanceOceanie - tauxMortOceanie;
//Graphe
x = ["Afrique", "Amerique du Nord", "Amerique du Sud", "Asie", "Europe", "Oceanie"];
y = [tauxAccroissementAfrique, tauxAccroissementAmeriqueNord, tauxAccroissementAmeriqueSud, tauxAccroissementAsie, tauxAccroissementEurope, tauxAccroissementOceanie];
bar(y);
xtitle("Taux d''accroissement moyen suivant le continent", "Continent", "Taux d''accroissement moyen");
ytitle("Afrique", "Amerique du Nord", "Amerique du Sud", "Asie", "Europe", "Oceanie");