- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
基于人工神经网络的 MATLAB 手写数字识别系统 1、函数 MouseDraw 实现手写识别系统 GUI 界面的建立和鼠标 手写的实现。(使用时保存为 MouseDraw.m)
function MouseDraw(action)
% MouseDraw 本例展示如何以Handle Graphics来设定滑鼠事件
% (MouseDraw Events)的反应指令(Callbacks)
% 本程序在鼠标移动非常快时,不会造成画“断线”
% global不能传矩阵
global InitialX InitialY FigHandle hb2 hb3 hb4 count hb5 hb6 hb7 count=E:\im.jpg;
imSize = 50;
if nargin == 0, action = start;
end
switch(action)
%%开启图形视窗
case start,
FigHandle = figure(WindowButtonDownFcn,MouseDraw down,DeleteFcn,save bpnet);
axis([1 imSize 1 imSize]); % 设定图轴范围%
set(gca,Position,[.25 .20 .7 .7]);
axis off;
grid off;
box on; % 将图轴加上图框
title(手写体输入窗);
try evalin(base,load bpnet)
catch
evalin(base,bpgdtrain);
end
% % fprintf(start);
%%设定滑鼠按钮被按下时的反应指令为「MouseDraw down」
% set(gcf, WindowButtonDownFcn, MouseDraw down);
hb1 = uicontrol(Parent, FigHandle, Units, Normalized, ... Position, [.3 .01 .13 .07], String, 保存, ...
Callback,[exa=rgb2gray(frame2im(getframe(gca)));,imwrite(exa ,E:\im.jpg)]);
hb2=uicontrol(Parent,FigHandle,Style,popupmenu,Position,[ 50 50 50 30],...
String, {26,24, 22, 20, 18, 16,14,12,10}); hb3=uicontrol(Parent, FigHandle,Style,text,...
Position,[10 90 90 30],String,[ CurrentX() ,CurrentY()]); hb4=uicontrol(Parent,FigHandle,Style,popupmenu,Position,[ 50 20 50 30],...
String,{Red,Blue,Black,Yellow,Green});
uicontrol(Parent,FigHandle,Position,[270 6 70 30],String,训 练,Callback,...
[exa=rgb2gray(frame2im(getframe(gca)));,sample=reshape(recgnit ion(exa),25,1);,clc;,...
t=inputdlg(数字类别,样品训练);,t=str2num(t{1,1}) /10;,...
bpnet.trainParam.lr=str2num(get(hb6,String));,bpnet.trainP
aram.goal=str2num(get(hb7,String));,...
[bpnet]=train(bpnet,sample,t);,save bpnet]);
uicontrol(Parent,FigHandle,Position,[360 6 70 30],String,识 别,Callback,...
[exa=rgb2gray(frame2im(getframe(gca)));,sample=reshape(recgnit
ion(exa),25,1);,...
record=round(sim(bpnet,sample)*10);,clc;,set(hb5,String, num2str(record),fontSize,48);]);
uicontrol(Parent,FigHandle,Style,text,Position,[10 60 30 20],String,字号);
uicontrol(Parent,FigHandle,Style,text,
文档评论(0)