fun1.m

用MATLAB编写的支持向量机

function tt=fun1(t1,X,y,a,o,w,N,k,p1)
global KM 
global X y a o w N k p1
M=size(p1,2);
for j=1:M
    for i=1:N
        A1(i)=a(i,1)*y(i)*(1+sum(X(i,:).*[p1(j) t1]))^o;
        B1(i)=a(i,1)*y(i)*(1+sum(X(i,:).*X(k(1),:)))^o-y(k(1))/N;
    end
    B=sum(B1)
    A(j)=sum(A1)
    tt(j)=A(j)-B
end

%E=B+1;
%F=B-1;