//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");