data = csvRead("../data.csv");

Superficie=data(:,2);
Population=data(:,3);

surfaceTerrestre=cumsum(Superficie)(207)
nbHabitants=cumsum(Population)(207)

DensitéMoyenne=mean(((nbHabitants * 10^6) / (surfaceTerrestre * 10^3)))

SurfaceAfrique=cumsum(data(1:57,2))(57)
HabitantsAfrique=cumsum(data(1:57,3))(57)
DensitéMoyAfrique=mean(((HabitantsAfrique * 10^6) / (SurfaceAfrique * 10^3)))

SurfaceAmeriqueN=cumsum(data(58:86,2))(29)
HabitantsAmeriqueN=cumsum(data(58:86,3))(29)
DensitéMoyAmeriqueN=mean(((HabitantsAmeriqueN * 10^6) / (SurfaceAmeriqueN * 10^3)))

SurfaceAmeriqueS=cumsum(data(87:99,2))(13)
HabitantsAmeriqueS=cumsum(data(87:99,3))(13)
DensitéMoyAmeriqueS=mean(((HabitantsAmeriqueS * 10^6) / (SurfaceAmeriqueS * 10^3)))

SurfaceAsie=cumsum(data(100:150,2))(51)
HabitantsAsie=cumsum(data(100:150,3))(51)
DensitéMoyAsie=mean(((HabitantsAsie * 10^6) / (SurfaceAsie * 10^3)))

SurfaceEurope=cumsum(data(151:193,2))(43)
HabitantsEurope=cumsum(data(151:193,3))(43)
DensitéMoyEurope=mean(((HabitantsEurope * 10^6) / (SurfaceEurope * 10^3)))

SurfaceOceanie=cumsum(data(194:207,2))(14)
HabitantsOceanie=cumsum(data(194:207,3))(14)
DensitéMoyOceanie=mean(((HabitantsOceanie * 10^6) / (SurfaceOceanie * 10^3)))


DensiteMoyParContinent=[DensitéMoyAfrique, DensitéMoyAmeriqueN, DensitéMoyAmeriqueS, DensitéMoyAsie, DensitéMoyEurope, DensitéMoyOceanie];		

bar(1:6, DensiteMoyParContinent)


RepartitionSurface=[SurfaceAfrique, SurfaceAmeriqueN, SurfaceAmeriqueS, SurfaceAsie, SurfaceEurope, SurfaceOceanie];

pie(RepartitionSurface, ["Afrique", "Amérique du Nord", "Amérique du Sud", "Asie", "Europe", "Océanie"])

RepartitionHabitants=[HabitantsAfrique, HabitantsAmeriqueN, HabitantsAmeriqueS, HabitantsAsie, HabitantsEurope, HabitantsOceanie];
pie(RepartitionHabitants, ["Afrique", "Amérique du Nord", "Amérique du Sud", "Asie", "Europe", "Océanie"])