createset.m

标准svm3.0程序 内有mex优化程序

function [Samples1,Labels,testS1,testL]=createset(value1,standdata)
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%value1是对应的全体类别号，要求从1开始；
%%standdata是对应value1的样本数据，不包含类别号；
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%按value1的类别号进行排序%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
[row column]=size(standdata);
[value,order]=sort(value1);
for i=1:column
    datai=standdata(:,i);
    orderi=datai(order);
    standdata(:,i)=orderi;
end
%%%%找到最大类别号，并按2/3和1/3进行测试集和训练集的分割%%%%%%%%%%%%%%%%%
catenu=max(value);
classnu=[];
trainnu=[];
beginloc=[1];
overnu=0;
overnut=0;
overloc=[];
overloct=[];
Samples1=[];
Labels=[];
testS1=[];
testL=[];
for i=1:catenu
  number=length(find(value==i));
  classnu=[classnu,number];
  trainnu=[trainnu,round(number*1/3)];
  overnut=overnut+number;
  beginloc=[beginloc,overnut+1];
  overnu=beginloc(i)+round(number*1/3)-1;
  overloc=[overloc,overnu];
  overloct=[overloct,overnut];
 
  Samples1=[Samples1;standdata(beginloc(i):overloc(i),:)];
  Labels=[Labels;value(beginloc(i):overloc(i))];
  testS1=[testS1;standdata(overloc(i)+1:overloct(i),:)];
  testL=[testL;value(overloc(i)+1:overloct(i))];
end