example52index.m

是一个用MATLAB编的一个系统

%hf2index
%==============
%==============

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

%界面说明
uicontrol(Hhf2,'style','text','units','normalized','position',[0.1 0.8 0.8 0.15],...
   'horizontal','center','string','例2. 两个神经元的Hopfield网络的设计实例','back',[0.8 0.8 0.8],...
   'fontsize',12,'fontWeight','bold');

%框架
uicontrol(Hhf2,'style','frame','units','normalized','position',[0.1 0.1 0.45 0.7],...
   'back',[0.8 0.8 0.8]);

uicontrol(Hhf2,'style','text','units','normalized','position',[0.12 0.68 0.42 0.1],...
   'string','网络所要存储的为T:','back',[0.8 0.8 0.8],'horizontal','left','fontsize',12);
uicontrol(Hhf2,'style','text','units','normalized','position',[0.12 0.61 0.42 0.1],...
   'string','  T＝[ 1　-1;','back',[0.8 0.8 0.8],'horizontal','left','fontsize',12);
uicontrol(Hhf2,'style','text','units','normalized','position',[0.12 0.54 0.42 0.1],...
   'string','  　　-1　 1]','back',[0.8 0.8 0.8],'horizontal','left','fontsize',12);

%网络参数设置
uicontrol(Hhf2,'style','text','units','normalized','position',[0.58 0.7 0.3 0.1],...
   'string','网络参数设置','back',[0.8 0.8 0.8],'horizontal','left','fontsize',12);

uicontrol(Hhf2,'style','text','units','normalized','position',[0.58 0.62 0.2 0.1],...
   'string','彷真中网络运行次数：','back',[0.8 0.8 0.8],'horizontal','left','fontsize',12);
Hhf2_step=uicontrol(Hhf2,'style','edit','units','normalized','position',[0.58 0.58 0.13 0.05],...
   'string','50','back',[0.8 0.8 0.8],'horizontal','left','fontsize',12);


%按钮
uicontrol(Hhf2,'style','push','units','normalized','position',[0.78 0.7 0.16 0.1],...
   'string','欲记忆矢量','callback','example52_figure','fontsize',12);
uicontrol(Hhf2,'style','push','units','normalized','position',[0.78 0.59 0.16 0.1],...
   'string','设计网络','callback','example52','fontsize',12);

uicontrol(Hhf2,'style','push','units','normalized','position',[0.78 0.48 0.16 0.1],...
   'string','单个输入彷真','fontsize',12,'callback',[...                                              
                                              'max_epoch=get(Hhf2_step,''string'');'...                                                                                        
                                              'example52_test1']);
uicontrol(Hhf2,'style','push','units','normalized','position',[0.78 0.37 0.16 0.1],...
   'string','多个输入彷真','fontsize',12','callback',[...
                                              'max_epoch=get(Hhf2_step,''string'');'...        
                                              'example52_test2']);

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

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