%%example76index
%==============
%==============

clc;
clear;
close;
%競爭神經(jīng)網(wǎng)絡(luò)
Hcomp6=figure('color',[0.8 0.8 0.8],'position',[120 120 600 400],'name',...
   'example7.6','numbertitle','off');

%界面說明
uicontrol(Hcomp6,'style','text','units','normalized','position',[0.1 0.8 0.8 0.15],...
   'horizontal','center','string','例6．用基于Sanger算法的PCA網(wǎng)絡(luò)進(jìn)行圖像特征提取','back',[0.8 0.8 0.8],...
   'fontsize',12,'fontWeight','bold');
%框架
uicontrol(Hcomp6,'style','frame','units','normalized','position',[0.1 0.1 0.45 0.7],...
   'back',[0.8 0.8 0.8]);

uicontrol(Hcomp6,'style','text','units','normalized','position',[0.12 0.47 0.42 0.3],...
   'string','實(shí)驗(yàn)樣本是具有4 種形狀的交通標(biāo)志圖像集合，共10個。用Sanger算法訓(xùn)練PCA網(wǎng)絡(luò)對樣本圖象進(jìn)行特征提取，之后輸入測試圖像觀察網(wǎng)絡(luò)對圖像的特征提取。','back',[0.8 0.8 0.8],'horizontal','left','fontsize',12);

%網(wǎng)絡(luò)參數(shù)設(shè)置
uicontrol(Hcomp6,'style','text','units','normalized','position',[0.58 0.7 0.3 0.1],...
   'string','網(wǎng)絡(luò)參數(shù)設(shè)置','back',[0.8 0.8 0.8],'horizontal','left','fontsize',12);

uicontrol(Hcomp6,'style','text','units','normalized','position',[0.58 0.62 0.2 0.1],...
   'string','最大訓(xùn)練步數(shù)：','back',[0.8 0.8 0.8],'horizontal','left','fontsize',12 );
Hcomp6_epoch=uicontrol(Hcomp6,'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(Hcomp6,'style','text','units','normalized','position',[0.58 0.50 0.2 0.1],...
   'string','學(xué)習(xí)速率：','back',[0.8 0.8 0.8],'horizontal','left','fontsize',12);
Hcomp6_rate=uicontrol(Hcomp6,'style','edit','units','normalized','position',[0.58 0.50 0.13 0.05],...
   'string','5e-8','back',[0.8 0.8 0.8],'horizontal','left','fontsize',12);

%按鈕
uicontrol(Hcomp6,'style','push','units','normalized','position',[0.79 0.7 0.18 0.1],...
   'string',' 實(shí)驗(yàn)圖像','callback','example76_figure','fontsize',12);
uicontrol(Hcomp6,'style','push','units','normalized','position',[0.79 0.59 0.18 0.1],...
   'string',' 訓(xùn)練網(wǎng)絡(luò)','fontsize',12,'callback',[...
                                              'epoch=get(Hcomp6_epoch,''string'');'...
                                              'rate=get(Hcomp6_rate,''string'');'...                                         
                                               'example76']);
 
uicontrol(Hcomp6,'style','push','units','normalized','position',[0.79 0.48 0.18 0.1],...
    'string','特征向量提取','callback','example76_eigenvector','fontsize',12);
uicontrol(Hcomp6,'style','push','units','normalized','position',[0.79 0.37 0.18 0.1],...
    'string','  測試網(wǎng)絡(luò)','callback','example76_result','fontsize',12);


%查看函數(shù)
uicontrol(Hcomp6,'style','push','units','normalized','position',[0.78 0.25 0.20 0.1],...
   'string','查看網(wǎng)絡(luò)函數(shù)','callback','NNfunctionindex','fontsize',12);

%退出
uicontrol(Hcomp6,'style','push','units','normalized','position',[0.78 0.13 0.20 0.1],...
   'string','返       回','callback','close(Hcomp6);NNindex16','fontsize',12);
uicontrol(Hcomp6,'style','push','units','normalized','position',[0.78 0.01 0.20 0.1],...
   'string','退出系統(tǒng)','callback','close(Hcomp6)','fontsize',12);