nfcv.m

用于matlab环境下的支持向量机svm的工具箱

function [xapp,yapp,xtest,ytest]=nfcv(x,y,N,k)

% USAGE
% 
% N-fold crossvalidation
% k indicates the portion to leave out for test
%
nbdata=length(y);
Nportion=round(nbdata/N);

% indtest=Nportion*(k-1)+1:min(Nportion*k,nbdata);
% indapp=setxor(1:nbdata,indtest);
% xapp=x(indapp,:);
% xtest=x(indtest,:);
% yapp=y(indapp);
% ytest=y(indtest);

indneg=find(y==-1);
indpos=find(y==1);
Nneg=length(indneg);
Npos=length(indpos);
NportionNeg=round(Nneg/N);
if k~=N
indtestNeg=indneg(NportionNeg*(k-1)+1:min(NportionNeg*k,Nneg));
else
    indtestNeg=indneg(NportionNeg*(k-1)+1:end);
end;
NportionPos=floor(Npos/N);
if k~=N
indtestPos=indpos(NportionPos*(k-1)+1:min(NportionPos*k,Npos));
else
    indtestPos=indpos(NportionPos*(k-1)+1:end);
end;
indappNeg=setxor(indneg,indtestNeg);
indappPos=setxor(indpos,indtestPos);

indtest=[indtestPos;indtestNeg];
indapp=[indappPos;indappNeg];
xapp=x(indapp,:);
xtest=x(indtest,:);
yapp=y(indapp);
ytest=y(indtest);