📄 svmfun.m
字号:
function[ak]=svmfun(class1,n1,class2,n2)
n=n1+n2;
z=[ones(1,25) -1*ones(1,25)];
class2(:,5)=-1*class2(:,5);
class2=-1*class2;
cl=[class1;class2];
H=zeros(n,n);
for i=1:n;
for j=1:n
H(i,j)=cl(i,:)*cl(j,:)';
end
end
c=-1*ones(50,1);
A=[];
b=[];
Aeq=z;
beq=0;
VLB=-1*ones(50,1);
VUB=ones(50,1);
x0=zeros(50,1);
[x,z]=quadprog(H,c,A,b,Aeq,beq,VLB,VUB,x0);
ak=(cl'*x)';
% n=n1+n2;
% z=[ones(1,25) -1*ones(1,25)];
% cl1=class1(:,1:4);
% cl2=class2(:,1:4);
% cl=[cl1;cl2];
% z=[ones(1,25) -1*ones(1,25)];
% H=zeros(n,n);
% for i=1:n;
% for j=1:n
% H(i,j)=z(i)*z(j)*cl(i,:)*cl(j,:)';
% end
% end
%
% c=-1*ones(50,1);
% A=[];
% b=[];
% Aeq=z;
% beq=0;
% VLB=-1*ones(50,1);
% VUB=ones(50,1);
% x0=zeros(50,1);
% [x,z]=quadprog(H,c,A,b,Aeq,beq,VLB,VUB,x0);
% x
% ak=(cl'*x)'
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -