testlin.m

各种SVM分类算法

               clear;clc;close all;
               disp('-------------采用线形内积函数的支持向量机的应用-------------');
               disp('输入样本矩阵(每行表示一个测试数据,一共20行):');
               x=[randn(1,20)-3 randn(1,20)+3;randn(1,40)]'
               disp('样本所属类别:');
               y=[-ones(1,20) ones(1,20)]'
               [nsv,alpha,bias,T]=svm168(x,y,'linear',10);
               fprintf('运行时间T=%g\n',T);
               fprintf('支持向量个数：%g\n',nsv);

               svcplot(x,y,'linear',alpha,bias);

               W=x'*alpha;
               disp('权系数向量:');
               W
               disp('测试数据（20组）:');
               X_test=[randn(1,20)-3 randn(1,20)+3;randn(1,40)]'
               disp('测试数据类别:');
               Y_test=[-ones(1,20) ones(1,20)]'
               disp('测试数据类别判决:');
               Output=X_test*W+bias
               disp('错误率:');
               number_error=sum(abs(Y_test-sign(Output)))/2;
               error=number_error/20