Modifs

EXO4/scripts/init.sce

@@ -1,6 +1,2 @@
-// Charger les données depuis le fichier CSV
-data = csvRead('data.csv');
-
-// Extraire les colonnes pertinentes (âge et salaire)
-age = data(:, 2);
-salaire = data(:, 7);
+csvDouble = csvRead("data.csv")                         //ouvre data.csv en une matrice d'entier
+csvString = csvRead("data.csv",[],[],'string')          //ouvre data.csv en une matrice de string

EXO4/scripts/q1.sce

@@ -1,31 +1,7 @@
-// Vérifier les dimensions
-disp(size(age));
-disp(size(salaire));
-
-clf;
-
-// Tracer le nuage de points avec les vraies données
-scatter(age, salaire, 10, 'filled');
-xlabel('Age');
-ylabel('Salaire');
-title('Nuage de points : Age vs Salaire');
-
-A = [ones(length(age), 1), age];
-coefficients = A \ salaire;
-salaire_pred = A * coefficients;
-
-// Tracer la droite de régression
-plot(age, salaire, '+'); // Tracer le nuage de points
-plot(age, salaire_pred, '-r'); // Tracer la droite de régression
-legend(['Données', 'Droite de régression'], 'Location', 'northwest');
-
-// Calcul manuel du coefficient de corrélation
-mean_age = mean(age);
-mean_salaire = mean(salaire);
-numerateur = sum((age - mean_age) .* (salaire - mean_salaire));
-denominateur = sqrt(sum((age - mean_age).^2) * sum((salaire - mean_salaire).^2));
-correlation_coefficient = numerateur / denominateur;
-
-// Affichage du coefficient de corrélation
-disp('Le coefficient de corrélation est :');
-disp(correlation_coefficient);
+X=csvDouble(:,7)
+Y=csvDouble(:,2)
+plot2d(X,Y,-1)
+[a,b] = reglin(X',Y')
+y_reg = a*X+b
+plot2d(X,y_reg,5)
+corrcoef(X,Y)

EXO4/scripts/q2.sce

@@ -0,0 +1,7 @@
+X=csvDouble(:,7)
+Y=csvDouble(:,6)
+plot2d(X,Y,-1)
+[a,b] = reglin(X',Y')
+y_reg = a*X+b
+plot2d(X,y_reg,5)
+corrcoef(X,Y)