randq.m

模式识别一份很好的作业,包括线性分类器；最小风险贝叶斯分类器；监督学习法分层聚类分析；K－L变换提取有效特征,支持向量机

%随机划分训练样本集和测试样本集
function [name_tr,name_test]=randQ(x)
j=1;k=1;
tr(250,252)=0;
test(250,252)=0;
for i=1:500
   if(rand>=0.5)
       if (j>250)
           for a=1:252
           test(k,a)=x(i,a);
           end
           k=k+1;
       else
          for a=1:252
          tr(j,a)=x(i,a);
          end
          j=j+1;
       end
   else
        if(k>250)
            for a=1:252
            tr(j,a)=x(i,a);
            end
            j=j+1;
        else
            for a=1:252
            test(k,a)=x(i,a);
            end
            k=k+1;
        end
    end 
end
name_tr=tr;
name_test=test;