example57index.m

NNDemo2.0是对神经网络实验演示系统NNDemo1.0的进一步增强与扩充

%hf7index
%==============
%==============clc;
clear;
close;
%Hopfield网络实验
Hhf7=figure('color',[0.8 0.8 0.8],'position',[120 120 600 400],'name',...
   'example5.7','numbertitle','off');

%界面说明
uicontrol(Hhf7,'style','text','units','normalized','position',[0.1 0.8 0.8 0.15],...
   'horizontal','center','string','例7. 用Hopfield网络进行简单的形状识别','back',[0.8 0.8 0.8],...
   'fontsize',12,'fontWeight','bold');


%框架
uicontrol(Hhf7,'style','frame','units','normalized','position',[0.1 0.3 0.45 0.5],...
   'back',[0.8 0.8 0.8]);
uicontrol(Hhf7,'style','text','units','normalized','position',[0.12 0.65 0.42 0.1],...
   'string','待识别的形状:','back',[0.8 0.8 0.8],'horizontal','left','fontsize',12);
uicontrol(Hhf7,'style','text','units','normalized','position',[0.12 0.58 0.42 0.1],...
   'string','1. 三角形','back',[0.8 0.8 0.8],'horizontal','left','fontsize',12);
uicontrol(Hhf7,'style','text','units','normalized','position',[0.12 0.51 0.42 0.1],...
   'string','2. 四边形','back',[0.8 0.8 0.8],'horizontal','left','fontsize',12);
uicontrol(Hhf7,'style','text','units','normalized','position',[0.12 0.44 0.42 0.1],...
   'string','3. 八边形','back',[0.8 0.8 0.8],'horizontal','left','fontsize',12);


%按钮
uicontrol(Hhf7,'style','push','units','normalized','position',[0.78 0.7 0.16 0.1],...
   'string','训练样本','callback','example57_trainfigure','fontsize',12);

uicontrol(Hhf7,'style','text','units','normalized','position',[0.58 0.64 0.2 0.1],...
   'string','待识别形状:','back',[0.8 0.8 0.8],'horizontal','left','fontsize',12);
Hhf7_figure=uicontrol(Hhf7,'style','popup','units','normalized','position',[0.58 0.62 0.13 0.05],...
   'string','1|2|3','value',1,'UserData',['example57_1';'example57_2';'example57_3']);
uicontrol(Hhf7,'style','push','units','normalized','position',[0.78 0.59 0.16 0.1],...
   'string','形状识别','fontsize',12,'callback',[...                                              
                                              'UD=get(Hhf7_figure,''UserData'');',...
                                           'eval(UD(get(Hhf7_figure,''value''),:))']);


%查看函数
uicontrol(Hhf7,'style','push','units','normalized','position',[0.77 0.25 0.18 0.1],...
   'string','查看网络函数','callback','NNfunctionindex','fontsize',12);

%退出
uicontrol(Hhf7,'style','push','units','normalized','position',[0.77 0.13 0.18 0.1],...
   'string','返       回','callback','close(Hhf7);NNindex14','fontsize',12);
uicontrol(Hhf7,'style','push','units','normalized','position',[0.77 0.01 0.18 0.1],...
   'string','退出系统','callback','close(Hhf7)','fontsize',12);