trainsvm.m

支持向量机的Matlab源码

clear;
load psample
%A=X;
load nsample
%B=X;
X =[A;B]; 
Y =[ones(50,1);-ones(50,1)];
[nsv alpha b0]=svc(X,Y,'poly',400);

for i=1:100
    if alpha(i)<1
        alpha(i)=0;
    end
end

%save alpha alpha