[Ex2 - Q7] Ajout
Co-authored-by: Dimitrijevic <hugo.dimitrijevic@etu.u-pec.fr>
This commit is contained in:
parent
f947aa7c4b
commit
ee59a52afa
GPG Key ID:
251ADD56CFE6A854
@ -45,6 +45,7 @@ Les réponses aux questions des exercices sont situées dans les README des doss
|
||||
- [Histogramme](ex2/#q4)
|
||||
- [Classement](ex2/#q5)
|
||||
- [Quartiles et écart inter-quartile](ex2/#q6)
|
||||
- [Déciles](ex2/#q7)
|
||||
3. [Taux d'accoissement naturel](ex3/)
|
||||
1. [Acroissements minimaux et maximaux](ex3/#q1)
|
||||
2. [Pays ayant un taux d'accroissement négatif](ex3/#q2)
|
||||
|
||||
@ -9,6 +9,7 @@
|
||||
4. [Histogramme](#q4)
|
||||
5. [Classement](#q5)
|
||||
6. [Quartiles et écart inter-quartile](#q6)
|
||||
7. [Déciles](#q7)
|
||||
|
||||
---
|
||||
|
||||
@ -212,6 +213,69 @@ Pays_inferieur_premier_quartile = pays(find(data(:,11)<quartile1))
|
||||
- Kiribati
|
||||
- Papouasie-Nouvelle-Guinée
|
||||
|
||||
---
|
||||
|
||||
## Question 7 : Déciles {#q7}
|
||||
|
||||
> Donner les valeurs du premier et du neuvième décile ainsi que la liste des pays dont l'espérance de vie est
|
||||
inférieure au premier décile ou supérieure au neuvième décile. Donner leur répartition suivant les continents.
|
||||
|
||||
**[Script Scilab](scripts/ex2-7.sce) :**
|
||||
|
||||
```scilab
|
||||
premierDecile = esperanceHomme(ceil(length(esperanceHomme)/10))
|
||||
neuviemeDecile = esperanceHomme(ceil(9*length(esperanceHomme)/10))
|
||||
|
||||
Pays_intervale_ext_decile = pays(find(data(:,11)<premierDecile | data(:,11)>neuviemeDecile))
|
||||
```
|
||||
|
||||
**Résultat :**
|
||||
|
||||
- Premier décile : 59 ans
|
||||
- Neuvieme décile : 79 ans
|
||||
- 37 Pays à l'extérieur de l'intervale :
|
||||
- Afrique (18 pays) :
|
||||
- Côted'Ivoire
|
||||
- Guinée-Bissau
|
||||
- Mali
|
||||
- Nigeria
|
||||
- SierraLeone
|
||||
- Burundi
|
||||
- Mozambique
|
||||
- Somalie
|
||||
- Sud-Soudan
|
||||
- Angola
|
||||
- Cameroun
|
||||
- Centrafricaine(République)
|
||||
- Congo
|
||||
- Congo(Répdémdu)
|
||||
- Gabon
|
||||
- Tchad
|
||||
- Lesotho
|
||||
- Swaziland
|
||||
- Asie (6 pays) :
|
||||
- Chypre
|
||||
- Israël
|
||||
- Singapour
|
||||
- Chine-HongKong
|
||||
- Chine-Macao
|
||||
- Japon
|
||||
- Europe (11 pays) :
|
||||
- Islande
|
||||
- Norvège
|
||||
- Suède
|
||||
- Liechtenstein
|
||||
- Luxembourg
|
||||
- Pays-Bas
|
||||
- Suisse
|
||||
- Espagne
|
||||
- Italie
|
||||
- Malte
|
||||
- Saint-Marin
|
||||
- Océanie (2 pays) :
|
||||
- Australie
|
||||
- Nouvelle-Zélande
|
||||
|
||||
|
||||
---
|
||||
|
||||
|
||||
53
ex2/scripts/ex2-7.sce
Normal file
53
ex2/scripts/ex2-7.sce
Normal file
@ -0,0 +1,53 @@
|
||||
data = csvRead("data.csv");
|
||||
pays = csvRead("data.csv",",",".","string")(:,1);
|
||||
esperanceHomme = gsort(data(:,11), 'g', 'i');
|
||||
|
||||
premierDecile = esperanceHomme(ceil(length(esperanceHomme)/10));
|
||||
neuviemeDecile = esperanceHomme(ceil(9*length(esperanceHomme)/10));
|
||||
|
||||
mprintf("Premier décile : %.0f ans\n",premierDecile);
|
||||
mprintf("Neuvieme décile : %.0f ans\n",neuviemeDecile);
|
||||
|
||||
Pays_intervale_ext_decile = pays(find(data(:,11)<premierDecile | data(:,11)>neuviemeDecile));
|
||||
|
||||
indice_pays = [1:207];
|
||||
indice_pays = matrix(indice_pays,length(indice_pays),1);
|
||||
indice_pays_intervale_ext_decile = indice_pays(find(data(:,11)<premierDecile | data(:,11)>neuviemeDecile),1);
|
||||
|
||||
Pays_Afrique_ext_intervale = Pays_intervale_ext_decile(find(indice_pays_intervale_ext_decile <= 57 ));
|
||||
Pays_Amerique_nord_ext_intervale = Pays_intervale_ext_decile(find(indice_pays_intervale_ext_decile >= 58 & indice_pays_intervale_ext_decile <= 86) );
|
||||
Pays_Amerique_sud_ext_intervale = Pays_intervale_ext_decile(find(indice_pays_intervale_ext_decile >= 87 & indice_pays_intervale_ext_decile <= 99) );
|
||||
Pays_Asie_ext_intervale = Pays_intervale_ext_decile(find(indice_pays_intervale_ext_decile >= 100 & indice_pays_intervale_ext_decile <= 150) );
|
||||
Pays_Europe_ext_intervale = Pays_intervale_ext_decile(find(indice_pays_intervale_ext_decile >= 151 & indice_pays_intervale_ext_decile <= 193) );
|
||||
Pays_Oceanie_ext_intervale = Pays_intervale_ext_decile(find(indice_pays_intervale_ext_decile >= 194 & indice_pays_intervale_ext_decile <= 207) );
|
||||
|
||||
mprintf("%.0f Pays à l''extérieur de l''intervale :\n",size(Pays_intervale_ext_decile,1));
|
||||
if (size(Pays_Afrique_ext_intervale,1) > 0)
|
||||
mprintf("\t- Afrique (%.0f pays) : \n",size(Pays_Afrique_ext_intervale,1));
|
||||
mprintf("\t\t- %s\n",Pays_Afrique_ext_intervale);
|
||||
end
|
||||
|
||||
if (size(Pays_Amerique_nord_ext_intervale,1) > 0)
|
||||
mprintf("\t- Amérique du Nord (%.0f pays) :\n",size(Pays_Amerique_nord_ext_intervale,1));
|
||||
mprintf("\t\t- %s\n",Pays_Amerique_nord_ext_intervale);
|
||||
end
|
||||
|
||||
if (size(Pays_Amerique_sud_ext_intervale,1) > 0)
|
||||
mprintf("\t- Amérique du Sud (%.0f pays) :\n",size(Pays_Amerique_sud_ext_intervale,1));
|
||||
mprintf("\t\t- %s\n",Pays_Amerique_sud_ext_intervale);
|
||||
end
|
||||
|
||||
if (size(Pays_Asie_ext_intervale,1) > 0)
|
||||
mprintf("\t- Asie (%.0f pays) :\n",size(Pays_Asie_ext_intervale,1));
|
||||
mprintf("\t\t- %s\n",Pays_Asie_ext_intervale);
|
||||
end
|
||||
|
||||
if (size(Pays_Europe_ext_intervale,1) > 0)
|
||||
mprintf("\t- Europe (%.0f pays) :\n",size(Pays_Europe_ext_intervale,1));
|
||||
mprintf("\t\t- %s\n",Pays_Europe_ext_intervale);
|
||||
end
|
||||
|
||||
if (size(Pays_Oceanie_ext_intervale,1) > 0)
|
||||
mprintf("\t- Océanie (%.0f pays) :\n",size(Pays_Oceanie_ext_intervale,1));
|
||||
mprintf("\t\t- %s\n",Pays_Oceanie_ext_intervale);
|
||||
end
|
||||
Loading…
Reference in New Issue
Block a user