%功能：形成輸入矢量p和目標(biāo)矢量t
function [p,t]=train_sample
p=zeros(1024,10);   t=zeros(1,10);
for k=0:9
    m=strcat(int2str(k),'.bmp');   % 將k值轉(zhuǎn)換為字符，并與字符串'.bmp'連接
    x=imread(m,'bmp');   %  讀入訓(xùn)練圖片
    for i=0:31
        p(i*32+1:(i+1)*32,k+1)=double(x(1:32,i+1));   %按列抽取x的值，以形成網(wǎng)絡(luò)的輸入
    end
    switch k                %形成目標(biāo)向量
        case 0
            t(k+1)=0;
        case 1
            t(k+1)=1;
        case 2
            t(k+1)=2;
        case 3
            t(k+1)=3;
        case 4
            t(k+1)=4;
        case 5
            t(k+1)=5;
        case 6
            t(k+1)=6;
        case 7
            t(k+1)=7;
        case 8
            t(k+1)=8;
        case 9
            t(k+1)=9;
    end
end