资源简介
基于SVM的手写字体识别
代码片段和文件信息
function Chapter_CharacterRecognitionUsingLibsvm
%% Matlab神经网络43个案例分析
% 基于SVM的手写字体识别
% by 李洋(faruto)
% http://www.matlabsky.com
% Email:faruto@163.com
% http://weibo.com/faruto
% http://blog.sina.com.cn/faruto
% 2013.01.01
%% A Little Clean Work
close all;
clear;
clc;
format compact;
%% 载入训练数据
% 利用uigetfile函数交互式选取训练样本
[FileNamePathNameFilterIndex] = uigetfile( ...
{‘*.jpg‘;‘*.bmp‘}‘请导入训练图片‘‘*.jpg‘‘MultiSelect‘‘on‘);
if ~FilterIndex
return;
end
num_train = length(FileName);
TrainData = zeros(num_train16*16);
TrainLabel = zeros(num_train1);
for k = 1:num_train
pic = imread([PathNameFileName{k}]);
pic = pic_preprocess(pic);
% 将标准化图像按列拉成一个向量并转置,生成50*256的训练样本矩阵
TrainData(k:) = double(pic(:)‘);
% 样本标签为样本所对应的数字
TrainLabel(k) = str2double(FileName{k}(4));
end
%% 建立支持向量机
% [bestCVaccuracybestcbestg] = ...
% SVMcgForClass(TrainLabelTrainData-88-88100.80.84.5)
% 设置GA相关参数
ga_option.maxgen = 100;
ga_option.sizepop = 20;
ga_option.cbound = [0100];
ga_option.gbound = [0100];
ga_option.v = 10;
ga_option.ggap = 0.9;
[bestCVaccuracybestcbestg] = ...
gaSVMcgForClass(TrainLabelTrainDataga_option)
% 训练
cmd = [‘-c ‘num2str(bestc)‘ -g ‘num2str(bestg)];
model = svmtrain(TrainLabel TrainData cmd);
% 在训练集上查看识别能力
preTrainLabel = svmpredict(TrainLabel TrainData model);
%% 载入测试样本
[FileNamePathNameFilterIndex] = uigetfile( ...
{‘*.jpg‘;‘*.bmp‘}‘请导入测试图片‘‘*.bmp‘‘MultiSelect‘‘on‘);
if ~FilterIndex
return;
end
num_train = length(FileName);
TestData = zeros(num_train16*16);
TestLabel = zeros(num_train1);
for k = 1:num_train
pic = imread([PathNameFileName{k}]);
pic = pic_preprocess(pic);
TestData(k:) = double(pic(:)‘);
TestLabel(k) = str2double(FileName{k}(4));
end
%% 对测试样本进行分类
preTestLabel = svmpredict(TestLabel TestData model);
assignin(‘base‘‘TestLabel‘TestLabel);
assignin(‘base‘‘preTestLabel‘preTestLabel);
TestLabel‘
preTestLabel‘
%% sub function of pre-processing pic
function pic_preprocess = pic_preprocess(pic)
% 图片预处理子函数
% 图像反色处理
pic = 255-pic;
% 设定阈值,将反色图像转成二值图像
pic = im2bw(pic0.4);
% 查找数字上所有像素点的行标y和列标x
[yx] = find(pic == 1);
% 截取包含完整数字的最小区域
pic_preprocess = pic(min(y):max(y) min(x):max(x));
% 将截取的包含完整数字的最小区域图像转成16*16的标准化图像
pic_preprocess = imresize(pic_preprocess[1616]);
属性 大小 日期 时间 名称
----------- --------- ---------- ----- ----
目录 0 2013-08-18 11:04 chapter19\
文件 2656 2013-08-18 11:04 chapter19\Chapter_CharacterRecognitionUsingLibsvm.m
目录 0 2013-08-18 11:05 chapter19\html\
文件 13826 2013-08-18 11:05 chapter19\html\Chapter_CharacterRecognitionUsingLibsvm.html
文件 4692 2013-08-18 11:05 chapter19\html\Chapter_CharacterRecognitionUsingLibsvm.png
文件 11234 2013-08-18 11:05 chapter19\html\Chapter_CharacterRecognitionUsingLibsvm_01.png
文件 452 2013-01-04 14:44 chapter19\pic_preprocess.m
目录 0 2013-08-18 10:48 chapter19\手写数字测试样本图片\
文件 7656 2009-04-27 15:42 chapter19\手写数字测试样本图片\num0_1.bmp
文件 7656 2009-04-27 15:43 chapter19\手写数字测试样本图片\num0_2.bmp
文件 7656 2009-04-27 15:44 chapter19\手写数字测试样本图片\num0_3.bmp
文件 7656 2009-04-27 15:45 chapter19\手写数字测试样本图片\num1_1.bmp
文件 7656 2009-04-27 15:45 chapter19\手写数字测试样本图片\num1_2.bmp
文件 7656 2009-04-27 15:48 chapter19\手写数字测试样本图片\num1_3.bmp
文件 7656 2009-04-27 15:49 chapter19\手写数字测试样本图片\num2_1.bmp
文件 7656 2009-04-27 15:49 chapter19\手写数字测试样本图片\num2_2.bmp
文件 7656 2009-04-27 15:50 chapter19\手写数字测试样本图片\num2_3.bmp
文件 7656 2009-04-27 13:49 chapter19\手写数字测试样本图片\num3_1.bmp
文件 7656 2009-04-27 13:50 chapter19\手写数字测试样本图片\num3_2.bmp
文件 7656 2009-04-27 13:50 chapter19\手写数字测试样本图片\num3_3.bmp
文件 7656 2009-04-27 13:51 chapter19\手写数字测试样本图片\num4_1.bmp
文件 7656 2009-04-27 13:51 chapter19\手写数字测试样本图片\num4_2.bmp
文件 7656 2009-04-27 13:52 chapter19\手写数字测试样本图片\num4_3.bmp
文件 7656 2009-04-27 13:41 chapter19\手写数字测试样本图片\num5_1.bmp
文件 7656 2009-04-27 13:43 chapter19\手写数字测试样本图片\num5_2.bmp
文件 7656 2009-04-27 13:44 chapter19\手写数字测试样本图片\num5_3.bmp
文件 7656 2009-04-27 13:53 chapter19\手写数字测试样本图片\num6_1.bmp
文件 7656 2009-04-27 13:53 chapter19\手写数字测试样本图片\num6_2.bmp
文件 7656 2009-04-27 13:54 chapter19\手写数字测试样本图片\num6_3.bmp
文件 7656 2009-04-27 13:55 chapter19\手写数字测试样本图片\num7_1.bmp
文件 7656 2009-04-27 13:55 chapter19\手写数字测试样本图片\num7_2.bmp
............此处省略58个文件信息
- 上一篇:fiddler--显示ip代码.txt
- 下一篇:pl0语法分析器
评论
共有 条评论