%perc2a
%%===============
%%===============
%

figure('name','訓(xùn)練過(guò)程圖示','numbertitle','off');

P=[-0.5 -0.5 0.3 0;-0.5 0.5 -0.5 1]; 
T=[1 1 0 0];
%initialization
[R,Q]=size(P);   [S,Q]=size(T);
W0=rands(S,R);    B0=rands(S,1);
W=W0;B=B0;
max_epoch=str2num(max_epoch);
%expressions
A=hardlim(NETSUM(W*P,B));
for epoch=1:max_epoch
   if all(A==T)
      epoch=epoch-1;
      break
   end
%learning
[dW,dB]=learnp(P,A,T);
W=W+dW;
B=B+dB;
%output after learning
A=hardlim(W*P,B);
plotpv(P,T);                   %在輸入矢量空間繪制輸入矢量和目標(biāo)矢量的位置
axis([-2 2 -2 2])             %定義橫坐標(biāo)和縱坐標(biāo)長(zhǎng)度
title('Input Vector Graph');    %寫圖標(biāo)題
xlabel('p1');                   %寫橫軸標(biāo)題
ylabel('p2');                   %寫縱軸標(biāo)題
hold on                         %當(dāng)前圖形模式打開(kāi)
plotpc(W,B);                   %繪制分類線

linehandle=findobj(gca,'type','line');
set(linehandle,'LineStyle','--','Color','r');   %設(shè)定初始分類線的線型和顏色

clc
hold on
end   
plotpc(W,B);           %繪制最終分類線

hold off               %關(guān)閉