% classify spect data
load spect.mat

% Label konvertieren
Ytr = 2*Ytr - 1;
Ytest = 2*Ytest - 1;

w = learnRegERM(Xtr, Ytr, 10, @hinge, @omega2);
Yeval = classRegERM(w,Xtr);
TrainAccuracy = 100*sum(Yeval == Ytr)/length(Ytr)


Yeval = classRegERM(w, Xtest);

% Genauigkeit auf allen Testbeispielen
Accuracy = 100*sum(Yeval == Ytest)/length(Ytest)

% Genauigkeit auf positiven Testbeispielen
i = find(Ytest > 0);
Accuracy_pos = 100*sum(Yeval(i) == Ytest(i))/length(i)

% Genauigkeit auf positiven Testbeispielen
i = find(Ytest < 0);
Accuracy_neg = 100*sum(Yeval(i) == Ytest(i))/length(i)
