SAE24_2022/ex2/scripts/ex2-7.sce
Lyanis SOUIDI 17e53a5203
Ajout de commentaires dans les scripts
Co-authored-by: Dimitrijevic <hugo.dimitrijevic@etu.u-pec.fr>
2023-05-20 23:22:33 +02:00

59 lines
3.1 KiB
Scilab

data = csvRead("data.csv");
pays = csvRead("data.csv",",",".","string")(:,1);
esperanceHomme = gsort(data(:,11), 'g', 'i');
//Valeur des premiers et neuvièmes decile
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);
//Selectionner uniquement les pays à l'extérieur de l'intervale 1er/9eme decile
Pays_intervale_ext_decile = pays(find(data(:,11)<premierDecile | data(:,11)>neuviemeDecile));
//Recuperer l'indice des pays correspondant à l'intervale extérieur
//Pour ce faire je crée un colonne de 1 à 207 qui va me permettre de stocker les indices des pays
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);
// Maintenant que nous connaissons les indices des pays à l'extérieur de l'intervale , on peut faire un tri pour chaque continent
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