chongpai_1.m

决策树

function data_1=chongpai_1(attribute,num,data)
data_1=zeros(num,12);
if attribute~=0
    switch attribute
        case 1
            leucocyte_train=zeros(num,2);
            leucocyte_train(:,1)=data(:,1);
            leucocyte_train(:,2)=[1:num];
            leucocyte_train=sortrows(leucocyte_train,1);
            data_1(:,1)=leucocyte_train(:,1);
            data_1(:,2)=leucocyte_train(:,2);
            %xlswrite('attribute.xls',leucocyte_train,'sheet1','a2:b701');
            %lymph_train=xlsread('attribute.xls','sheet1','e2:f701');
            middle=zeros(num,2);
            middle(:,1)=data(:,2);
            middle(:,2)=[1:num];
            middle_train=zeros(num,2);
            for i=1:num
                middle_train(i,1)=middle(leucocyte_train(i,2),1);
                middle_train(i,2)=leucocyte_train(i,2);
            end
            data_1(:,3)=middle_train(:,1);
            data_1(:,4)=middle_train(:,2);
            clear middle i middle_train data(:,1) data(:,2);

            lymph=zeros(num,2);
            lymph(:,1)=data(:,3);
            %lymph(:,1)=xlsread('xiongmen.xls','1','e2:e701');
            lymph(:,2)=[1:num];
            lymph_train=zeros(num,2);
            for i=1:num
                lymph_train(i,1)=lymph(leucocyte_train(i,2),1);
                lymph_train(i,2)=leucocyte_train(i,2);
            end
            data_1(:,5)=lymph_train(:,1);
            data_1(:,6)=lymph_train(:,2);
            %xlswrite('attribute.xls',lymph_train,'sheet1','e2:f701');
            clear lymph i lymph_train data(:,3);
            %lymph_train=xlsread('attribute.xls','sheet1','e2:f701');
            erythrocyte=zeros(num,2);
            erythrocyte(:,1)=data(:,4);
            %erythrocyte(:,1)=xlsread('xiongmen.xls','1','f2:f701');
            erythrocyte(:,2)=[1:num];
            erythrocyte_train=zeros(num,2);
            for i=1:num
                erythrocyte_train(i,1)=erythrocyte(leucocyte_train(i,2),1);
                erythrocyte_train(i,2)=leucocyte_train(i,2);
            end
            data_1(:,7)=erythrocyte_train(:,1);
            data_1(:,8)=erythrocyte_train(:,2);
            %xlswrite('attribute.xls',erythrocyte_train,'sheet1','g2:h701');
            clear erythrocyte erythrocyte_train i data(:,4);

            %lymph_train=xlsread('attribute.xls','sheet1','e2:f701');
            hypo=zeros(num,2);
            hypo(:,1)=data(:,5);
            %hypo(:,1)=xlsread('xiongmen.xls','1','g2:g701');
            hypo(:,2)=[1:num];
            hypo_train=zeros(num,2);
            for i=1:num
                hypo_train(i,1)=hypo(leucocyte_train(i,2),1);
                hypo_train(i,2)=leucocyte_train(i,2);
            end
            data_1(:,9)=hypo_train(:,1);
            data_1(:,10)=hypo_train(:,2);
            %xlswrite('attribute.xls',hypo_train,'sheet1','i2:j701');
            clear hypo_train hypo i data(:,5);

            %lymph_train=xlsread('attribute.xls','sheet1','e2:f701');
            platelet=zeros(num,2);
            platelet(:,1)=data(:,6);
            %platelet(:,1)=xlsread('xiongmen.xls','1','h2:h701');
            platelet(:,2)=[1:num];
            platelet_train=zeros(num,2);
            for i=1:num
                platelet_train(i,1)=platelet(leucocyte_train(i,2),1);
                platelet_train(i,2)=leucocyte_train(i,2);
            end
            data_1(:,11)=platelet_train(:,1);
            data_1(:,12)=platelet_train(:,2);
            %xlswrite('attribute.xls',platelet_train,'sheet1','k2:l701');
            %clear;
        case 2
            middle_train=zeros(num,2);
            middle_train(:,1)=data(:,2);
            %middle_train(:,1)=xlsread('xiongmen.xls','1','d2:d701');
            middle_train(:,2)=[1:num];
            middle_train=sortrows(middle_train,1);
            data_1(:,3)= middle_train(:,1);
            data_1(:,4)=middle_train(:,2);
            %xlswrite('attribute.xls',middle_train,'sheet1','c2:d701');
            leucocyte=zeros(num,2);
            leucocyte(:,1)=data(:,1);
            %leucocyte(:,1)=xlsread('xiongmen.xls','1','c2:c701');
            leucocyte(:,2)=[1:num];
            leucocyte_train=zeros(num,2);
            for i=1:num
                leucocyte_train(i,1)=leucocyte(middle_train(i,2),1);
                leucocyte_train(i,2)=middle_train(i,2);
            end
            data_1(:,1)=leucocyte_train(:,1);
            data_1(:,2)=leucocyte_train(:,2);
            %xlswrite('attribute.xls',leucocyte_train,'sheet1','a2:b701');
            clear leucocyte i leucocyte_train data(:,1) data(:,2);

            lymph=zeros(num,2);
            lymph(:,1)=data(:,3);
            %lymph(:,1)=xlsread('xiongmen.xls','1','e2:e701');
            lymph(:,2)=[1:num];
            lymph_train=zeros(num,2);
            for i=1:num
                lymph_train(i,1)=lymph(middle_train(i,2),1);
                lymph_train(i,2)=middle_train(i,2);
            end
            data_1(:,5)=lymph_train(:,1);
            data_1(:,6)=lymph_train(:,2);
            %xlswrite('attribute.xls',lymph_train,'sheet1','e2:f701');
            clear lymph i lymph_train data(:,3);

            erythrocyte=zeros(num,2);
            erythrocyte(:,1)=data(:,4);
            %erythrocyte(:,1)=xlsread('xiongmen.xls','1','f2:f701');
            erythrocyte(:,2)=[1:num];
            erythrocyte_train=zeros(num,2);
            for i=1:num
                erythrocyte_train(i,1)=erythrocyte(middle_train(i,2),1);
                erythrocyte_train(i,2)=middle_train(i,2);
            end
            data_1(:,7)=erythrocyte_train(:,1);
            data_1(:,8)=erythrocyte_train(:,2);
            %xlswrite('attribute.xls',erythrocyte_train,'sheet1','g2:h701');
            clear erythrocyte i erythrocyte_train data(:,4);

            hypo=zeros(num,2);
            hypo(:,1)=data(:,5);
            %hypo(:,1)=xlsread('xiongmen.xls','1','g2:g701');
            hypo(:,2)=[1:num];
            hypo_train=zeros(num,2);
            for i=1:num
                hypo_train(i,1)=hypo(middle_train(i,2),1);
                hypo_train(i,2)=middle_train(i,2);
            end
            data_1(:,9)=hypo_train(:,1);
            data_1(:,10)=hypo_train(:,2);
            %xlswrite('attribute.xls',hypo_train,'sheet1','i2:j701');
            clear hypo i hypo_train data(:,5);

            platlet=zeros(num,2);
            platlet(:,1)=data(:,6);
            %platlet(:,1)=xlsread('xiongmen.xls','1','h2:h701');
            platlet(:,2)=[1:num];
            platlet_train=zeros(num,2);
            for i=1:num
                platlet_train(i,1)=platlet(middle_train(i,2),1);
                platlet_train(i,2)=middle_train(i,2);
            end
            data_1(:,11)=platlet_train(:,1);
            data_1(:,12)=platlet_train(:,2);
            %xlswrite('attribute.xls',platlet_train,'sheet1','k2:l701');
            % clear;

        case 3
            lymph_train=zeros(num,2);
            lymph_train(:,1)=data(:,3);
            %lymph_train(:,1)=xlsread('xiongmen.xls','1','e2:e701');
            lymph_train(:,2)=[1:num];
            lymph_train=sortrows(lymph_train,1);
            data_1(:,5)=lymph_train(:,1);
            data_1(:,6)=lymph_train(:,2);
            %xlswrite('attribute.xls',lymph_train,'sheet1','e2:f701');
            leucocyte=zeros(num,2);
            leucocyte(:,1)=data(:,1);
            %leucocyte(:,1)=xlsread('xiongmen.xls','1','c2:c701');
            leucocyte(:,2)=[1:num];
            leucocyte_train=zeros(num,2);
            for i=1:num
                leucocyte_train(i,1)=leucocyte(lymph_train(i,2),1);
                leucocyte_train(i,2)=lymph_train(i,2);
            end
            data_1(:,1)=leucocyte_train(:,1);
            data_1(:,2)=leucocyte_train(:,2);
            %xlswrite('attribute.xls',leucocyte_train,'sheet1','a2:b701');
            clear leucocyte i leucocyte_train data(:,1) data(:,3);

            middle=zeros(num,2);
            middle(:,1)=data(:,2);
            %middle(:,1)=xlsread('xiongmen.xls','1','d2:d701');
            middle(:,2)=[1:num];
            middle_train=zeros(num,2);
            for i=1:num
                middle_train(i,1)=middle(lymph_train(i,2),1);
                middle_train(i,2)=lymph_train(i,2);
            end
            data_1(:,3)=middle_train(:,1);
            data_1(:,4)=middle_train(:,2);
            %xlswrite('attribute.xls',middle_train,'sheet1','c2:d701');
            clear middle i middle_train data(:,2);

            erythrocyte=zeros(num,2);
            erythrocyte(:,1)=data(:,4);
            %erythrocyte(:,1)=xlsread('xiongmen.xls','1','f2:f701');
            erythrocyte(:,2)=[1:num];
            erythrocyte_train=zeros(num,2);
            for i=1:num
                erythrocyte_train(i,1)=erythrocyte(lymph_train(i,2),1);
                erythrocyte_train(i,2)=lymph_train(i,2);
            end
            data_1(:,7)=erythrocyte_train(:,1);
            data_1(:,8)=erythrocyte_train(:,2);
            %xlswrite('attribute.xls',erythrocyte_train,'sheet1','g2:h701');
            clear erythrocyte i erythrocyte_train data(:,4);

            hypo=zeros(num,2);
            hypo(:,1)=data(:,5);
            %hypo(:,1)=xlsread('xiongmen.xls','1','g2:g701');
            hypo(:,2)=[1:num];
            hypo_train=zeros(num,2);
            for i=1:num
                hypo_train(i,1)=hypo(lymph_train(i,2),1);
                hypo_train(i,2)=lymph_train(i,2);
            end
            data_1(:,9)=hypo_train(:,1);
            data_1(:,10)=hypo_train(:,2);
            %xlswrite('attribute.xls',hypo_train,'sheet1','i2:j701');
            clear hypo i hypo_train data(:,5);

            platlet=zeros(num,2);
            platlet(:,1)=data(:,6);
            %platlet(:,1)=xlsread('xiongmen.xls','1','h2:h701');
            platlet(:,2)=[1:num];
            platlet_train=zeros(num,2);
            for i=1:num
                platlet_train(i,1)=platlet(lymph_train(i,2),1);
                platlet_train(i,2)=lymph_train(i,2);
            end
            data_1(:,11)=platlet_train(:,1);
            data_1(:,12)=platlet_train(:,2);
            %xlswrite('attribute.xls',platlet_train,'sheet1','k2:l701');
            %  clear hypo i hypo_train data(:,6);

        case 4
            erythrocyte_train=zeros(num,2);
            erythrocyte_train(:,1)=data(:,4);