Download Report (french) (pdf...)

Transcript
%
prédictions
Boucle en cas d'égalité sur les
if(b1==classe_du_test(indice_prediction(b2-1))) % vérification de
la prédiction
prédiction
prédiction
y=y+1; % incrémentation de l'ordonnée en cas de bonne
else
x=x+1; % incrémentation de l'abscisse en cas de mauvaise
end % if - si bonne prédiction alors... sinon...
b2 = b2 -1;
end % While - Fin de la boucle en cas d'égalité sur les prédictions
int=int+(x-xo)*(y+yo)/2; % ajout de l'aire du trapèze
b2=b2-1;
end % While - Fin de la boucle sur l'ensemble de test
if((x*y)~=0) % vérification que l'aire du graphe n'est pas nulle
int=int/(x*y); % normalisation de l'aire sous la courbe de roc
end % if
if(x==0)
int=1;
end %if
% Préparation de la boucle sur les classes de test
b4=1; % Paramètre de boucle sur l'ensemble des classes de test
b4max1=size(classe_du_test);
b4max2=b4max1(2); % Obtention de la taille de l'ensemble des classes de test
proba_classe=0; % initialisation de la probabilité de la classe courante
while (b4~=(b4max2+1)) % boucle sur les classes de test
if (classe_du_test(b4)==b1) % si la classe de test est égale à la classe
courante
proba_classe=proba_classe+1/b4max2; % incrémentation de la
probabilité de la classe courante
end % if - si égalité des classes alors... sinon...
b4=b4+1;
end % While - Boucle sur les classes de test
auc=auc + int*proba_classe; % calcul de l'espérance des AUC
% (pondération par la probabilité des
% classes de l'ensemble de test)
b1=b1+1;
end % While - Fin de la boucle sur les classes
Code du fichier extraction.m
function [app_tab_reduit, app_clas_reduit] = extraction(app_tab, app_clas,
pourcentage)
% Préparation de la boucle sur les tirages de l'ensemble d'apprentissage.
b1=1; % Paramètre de boucle
nb_instance1=size(app_tab);
nb_instance=nb_instance1(1); % Obtention du nombre d'instances dans l'ensemble
d'apprentissage
tirage = floor(nb_instance*pourcentage/100);
controle = zeros(nb_instance);
77