example26index.m

是一个用MATLAB编的一个系统

%line3index
%==============
%==============
clc;
clear;
close;
%自适应线性网络实验
Hline3=figure('color',[0.8 0.8 0.8],'position',[120 120 600 400],'name',...
   'example2.6','numbertitle','off');

%界面说明
uicontrol(Hline3,'style','text','units','normalized','position',[0.1 0.8 0.75 0.15],...
   'horizontal','center','string','例6. 用自适应线性元件解决多神经元网络的模式联想问题。','back',[0.8 0.8 0.8],...
   'fontsize',12,'fontWeight','bold');

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

uicontrol(Hline3,'style','text','units','normalized','position',[0.12 0.68 0.42 0.1],...
   'string','输入矢量和目标矢量分别为：','back',[0.8 0.8 0.8],'horizontal','left','fontsize',12);
uicontrol(Hline3,'style','text','units','normalized','position',[0.12 0.56 0.42 0.1],...
   'string','输入矢量 P=[1 1.5 1.2 -0.3;','back',[0.8 0.8 0.8],'horizontal','left','fontsize',12);
uicontrol(Hline3,'style','text','units','normalized','position',[0.12 0.49 0.42 0.1],...
   'string','                       -1 2 3 -0.5;','back',[0.8 0.8 0.8],'horizontal','left','fontsize',12);
uicontrol(Hline3,'style','text','units','normalized','position',[0.12 0.42 0.42 0.1],...
   'string','                       2 1 -1.6 0.9]','back',[0.8 0.8 0.8],'horizontal','left','fontsize',12);
uicontrol(Hline3,'style','text','units','normalized','position',[0.12 0.33 0.42 0.1],...
   'string','目标矢量 T=[0.5 3 -2.2 1.4;','back',[0.8 0.8 0.8],'horizontal','left','fontsize',12);
uicontrol(Hline3,'style','text','units','normalized','position',[0.12 0.26 0.42 0.1],...
   'string','                       1.1 -1.2 1.7 -0.4;','back',[0.8 0.8 0.8],'horizontal','left','fontsize',12);
uicontrol(Hline3,'style','text','units','normalized','position',[0.12 0.19 0.42 0.1],...
   'string','                       3 0.2 -1.8 -0.4;','back',[0.8 0.8 0.8],'horizontal','left','fontsize',12);
uicontrol(Hline3,'style','text','units','normalized','position',[0.12 0.12 0.42 0.1],...
   'string','                       -1 0.1 1.0 0.6]','back',[0.8 0.8 0.8],'horizontal','left','fontsize',12);


%网络参数设置
uicontrol(Hline3,'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(Hline3,'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);
Hline3_step=uicontrol(Hline3,'style','edit','units','normalized','position',[0.58 0.62 0.13 0.05],...
   'string','400','back',[0.8 0.8 0.8],'horizontal','left','fontsize',12);
uicontrol(Hline3,'style','text','units','normalized','position',[0.58 0.50 0.2 0.1],...
   'string','期望误差：','back',[0.8 0.8 0.8],'horizontal','left','fontsize',12);
Hline3_error=uicontrol(Hline3,'style','edit','units','normalized','position',[0.58 0.50 0.13 0.05],...
   'string','0.001','back',[0.8 0.8 0.8],'horizontal','left','fontsize',12);

uicontrol(Hline3,'style','text','units','normalized','position',[0.58 0.37 0.2 0.1],...
   'string','验证网络：','back',[0.8 0.8 0.8],'horizontal','left','fontsize',12);
uicontrol(Hline3,'style','push','units','normalized','position',[0.58 0.35 0.08 0.06],...
       'string','确 定','fontsize',12,'callback','example26_test');



%按钮
uicontrol(Hline3,'style','push','units','normalized','position',[0.78 0.7 0.16 0.1],...
   'string','运行程序','fontsize',12,'callback',[...
       'max_epoch=get(Hline3_step,''string'');'...
       'err_goal=get(Hline3_error,''string'');'...
       'example26']);
uicontrol(Hline3,'style','push','units','normalized','position',[0.78 0.57 0.16 0.1],...
   'string','显示误差曲线','fontsize',12,'callback','example26_error');

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

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