% email-ek osztályozása 57 attributum alapján, 2 osztályba 
% (spam/nem spam)
% a feladat leírása, ill az eredeti adathalmaz: 
% https://archive.ics.uci.edu/ml/datasets/spambase

A=importdata('spambase.dat');
% inputs=A(:,1:57);
% targets=A(:,58);

model=fitcsvm(A(:,1:57),A(:,58),'KernelFunction','gaussian','KernelScale',3);

label=predict(model,A(:,1:57));
TablSVM=crosstab(label,A(:,58))
accuracySVM=sum(label==A(:,58))/numel(label)