zimushibie 图片 26个字母识别 用matlab实现的

图片 26个字母识别 用matlab实现的，本人调试通过了，版本是7.1

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%识别26个大写字母%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
clc;
clear all;
disp（‘回车键 ...‘）
chos=input（‘请直接按回车键正在生成输入向量和目标向量，请稍等… ‘）;
if isempty（chos） chos=0; end 
if chos==0
for kk=0:256 
    p1=ones（1616）;% 初始化16×16的二值图像像素值（全白）   
    m =strcat（‘nums\‘int2str（kk）‘.bmp‘）;% 形成训练样本图像的文件名（0～89.bmp）    
    x=imread（m‘bmp‘）;% 读入训练样本图像文件   
    bw=im2bw（x0.5）;% 将读入的训练样本图像转换为二值图像  
    [ij]= find（bw==0）;% 寻找二值图像中像素值为0（黑）的行号和列号  
    imin=min（i）;% 寻找二值图像中像素值为0（黑）的最小行号 
    imax=max（i）;% 寻找二值图像中像素值为0（黑）的最大行号   
    jmin=min（j）;% 寻找二值图像中像素值为0（黑）的最小列号   
    jmax=max（j）;% 寻找二值图像中像素值为0（黑）的最大列号   
    bw1=bw（imin:imaxjmin:jmax）;% 截取图像像素值为0（黑）的最大矩形区域 
    rate=16/max（size（bw1））;% 计算截取图像转换为16×16的二值图像的缩放比例
    bw1=imresize（bw1rate）;% 将截取图像转换为16×1

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件      14502  2009-05-07 22:23  字母识别\123.bmp

     文件      12566  2009-05-07 22:22  字母识别\143.bmp

     文件     118191  2010-06-01 15:17  字母识别\E52net.mat

     文件       4344  2010-06-01 15:15  字母识别\E52PT.mat

     文件       4373  2010-05-31 13:03  字母识别\shibie.asv

     文件       4376  2009-06-23 13:32  字母识别\shibie.m

     文件       1511  2009-06-23 13:34  字母识别\shibie2.m

    ..A.SH.    395292  2010-06-01 15:21  字母识别\Thumbs.db

     文件      48128  2010-06-01 16:22  字母识别\神经网络.doc

     目录          0  2010-06-01 16:28  字母识别

----------- ---------  ---------- -----  ----

               603283                    10