SHARE
TWEET

trainbpaoff

pabloducato Jun 13th, 2018 64 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. clear all
  2. close all
  3. format compact
  4. nntwarn off
  5. load wagi
  6.     Pn = -1:0.1:-0.5;
  7.     Tn = [-.9602 -.5770 -.0729 .3771 .6405 .6600];
  8.  
  9.     S1_vec      = [7];      %Ilość neuronów w pierwszej warstwie
  10.     S2_vec      = [7];      %Ilość neuronów w drugiej warstwie
  11.     [S3,Q]      = size(Tn); %Ilość neuronów w warstwie wyjściowej
  12.     disp_freq   = 500;      %Czestotliwosc wyswietlania wynikow
  13.     max_epoch   = 10000;    %Maksymalna liczba epok
  14.     err_goal    = 0.001;    %Error goal
  15.     lr          = 0.001;    %Learning rate
  16.     lr_inc_vec  = [1.05];   %Zgodnie ze wzorem instrukcji do laboratorium lr_inc_vec
  17.     lr_dec_vec  = [0.7];    %Zgodnie ze wzorem instrukcji do laboratorium lr_dec_vec
  18.     mc_vec      = [0.9];    %Momentum constant
  19.     er_vec      = [1.04];   %Maximum error ratio
  20.  
  21.     liczba_petli = length(S1_vec)*length(S2_vec)*length(lr_inc_vec)*length(lr_dec_vec)*length(er_vec)*length(mc_vec);
  22.     ind_petli = 0;
  23.     ind_petli2 = 0;
  24.  
  25.     qmax=0;
  26.     SSEmin=10000;
  27.  
  28.     for ind_S1=1:length(S1_vec),
  29.         for ind_S2=1:length(S2_vec),      
  30.             for ind_lr_inc=1:length(lr_inc_vec),
  31.                 for ind_lr_dec=1:length(lr_dec_vec),
  32.                         for ind_er=1:length(er_vec),
  33.                             [W1,B1,W2,B2,W3,B3] = initff(Pn,S1_vec(ind_S1),'tansig',S2_vec(ind_S2),'tansig',S3,'purelin');
  34.                             save wagi
  35.                             TP = [disp_freq max_epoch err_goal lr lr_inc_vec(ind_lr_inc) lr_dec_vec(ind_lr_dec) er_vec(ind_er)];              
  36.                             [W1,B1,W2,B2,W3,B3,TE,TR] = trainbpa(W1,B1,'tansig',W2,B2,'tansig',W3,B3,'purelin',Pn,Tn,TP);
  37.                             a = simuff(Pn,W1,B1,'tansig',W2,B2,'tansig',W3,B3,'purelin');
  38.                             q = (1-sum(abs(Tn-a)>=0.5)/length(Pn))*100;
  39.                             SSE = TR(1,TE+1);
  40.                         end
  41.                     end
  42.             end
  43.         end
  44.     end
  45. epoch
  46. SSE
RAW Paste Data
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand
 
Top