Modifs

EXO3/scripts/q1-autres.sce

@@ -0,0 +1,3 @@
+id_other = find(csvString(:,3) == "Other" )
+salaire_other = csvDouble(id_other,7)
+histplot(10,salaire_other,normalization=%f)

EXO3/scripts/q1-femme.sce

@@ -0,0 +1,3 @@
+id_female = find(csvString(:,3) == "Female" )
+salaire_female = csvDouble(id_female,7)
+histplot(10,salaire_female,normalization=%f)

EXO3/scripts/q1-homme.sce

@@ -0,0 +1,3 @@
+id_male = find(csvString(:,3) == "Male" )
+salaire_male = csvDouble(id_male,7)
+histplot(10,salaire_male,normalization=%f)

EXO3/scripts/q1.sce

@@ -1,17 +0,0 @@
-D_homme = D(genre == 'Male',:);
-D_femme = D(genre == 'Female',:);
-salaire_homme = D_homme(:,7);
-salaire_femme = D_femme(:,7);
-num_bins = 50;
-
-subplot(2, 1, 1);
-histplot(num_bins, salaire_homme);
-title("Distribution des salaires pour les hommes");
-xlabel("Salaire");
-ylabel("Fréquence");
-
-subplot(2, 1, 2); 
-histplot(num_bins, salaire_femme);
-title("Distribution des salaires pour les femmes");
-xlabel("Salaire");
-ylabel("Fréquence");

EXO3/scripts/q2.sce

@@ -1,13 +1,25 @@
-niveau_etudes = D(:, 4);
-salaires = D(:, 7);
-unique_niveaux = unique(niveau_etudes);
-moy_salaire_par_niveau = zeros(size(unique_niveaux));
+indice_high = find(csvDouble(:,4) == 0 )
+salaire_high = csvDouble(indice_high,7)
+moy_h = mean(salaire_high)                                      
 
-for i = 1:length(unique_niveaux)
-    moy_salaire_par_niveau(i) = mean(salaires(niveau_etudes == unique_niveaux(i)));
-end
 
-bar(unique_niveaux, moy_salaire_par_niveau);
+indice_b = find(csvDouble(:,4) == 1 )
+salaire_b = csvDouble(indice_b,7)
+moy_b = mean(salaire_b)                                         
+
+
+indice_m = find(csvDouble(:,4) == 2 )
+salaire_m = csvDouble(indice_m,7)
+moy_m = mean(salaire_m)                                         
+
+
+indice_p = find(csvDouble(:,4) == 3)
+salaire_p = csvDouble(indice_p,7)
+moy_p = mean(salaire_p)                                         
+
+
+matrice = [moy_h,moy_b,moy_m,moy_p]
+bar([0,1,2,3],matrice)
 
 xlabel("Niveau d''études");
 ylabel("Salaire moyen");

EXO3/scripts/q3.sce

@@ -1,8 +1,15 @@
-Q = quart(salaires)
-IQR = Q(3) - Q(1);
-min_salaire = min(salaires)
-max_salaire = max(salaires)
-mean(salaires)
-median(salaires)
-stdev(salaires)
-boxplot(salaires)
+mean(csvDouble(:,7))        //moyenne
+min(csvDouble(:,7))         //min
+max(csvDouble(:,7))         //max
+median(csvDouble(:,7))      //médianne
+quart(csvDouble(:,7))       //quartile
+iqr(csvDouble(:,7))         //interquartile
+stdev(csvDouble(:,7))       //ecart-type
+
+sal = tabul(csvDouble(:,7));
+[occurence_tri,indice_tri] = gsort(sal(:,2));
+liste_exp = sal(:,1);
+mode = liste_exp(200)        //mode
+
+atomsLoad("stixbox")
+boxplot(csvDouble(:,7),"orientation","horizontal")

EXO3/scripts/q4-autres.sce

@@ -0,0 +1,3 @@
+id_other = find(csvString(:,3) == "Other" )
+salaire_other = csvDouble(id_other,7)
+boxplot(salaire_female,"orientation","horizontal")

EXO3/scripts/q4-femme.sce

@@ -0,0 +1,3 @@
+id_female = find(csvString(:,3) == "Female" )
+salaire_female = csvDouble(id_female,7)
+boxplot(salaire_female,"orientation","horizontal")

EXO3/scripts/q4-homme.sce

@@ -0,0 +1,3 @@
+id_male = find(csvString(:,3) == "Male" )
+salaire_male = csvDouble(id_male,7)
+boxplot(salaire_male,"orientation","horizontal")

EXO3/scripts/q4.sce

@@ -1,24 +0,0 @@
-QH = quart(salaire_homme)  
-QF = quart(salaire_femme)
-IQH = QH(3) - QH(1)   
-IQF = QF(3) - QF(1)
- min(salaire_homme)  
-min(salaire_femme)   
-max(salaire_homme)   
-max(salaire_femme)   
-mean(salaire_homme) 
-mean(salaire_femme)  
-median(salaire_homme) 
-median(salaire_femme)  
-stdev(salaire_homme) 
-stdev(salaire_femme) 
-
-// boite à moustache hommes : 
-boxplot(salaire_homme);
-title("Boîte à moustaches des salaires des hommes");
-ylabel("Salaires");
-
-// boite à moustache femmes : 
-boxplot(salaire_femme);
-title("Boîte à moustaches des salaires des femmes");
-ylabel("Salaires");