% wf04
 p=[1.0 1.5 3.0 -1.2];
 t=[0.5 1.1 3.0 -1.0];  
 net = newlind(p,t);                           %設計網絡
w=net.iw{1,1};                               %求網路訓練結束后的網絡權值和偏差   
b=net.b{1};
y=sim(net,p)                                 %輸出結果
% sse=SSE(t-y)                                 %求誤差的平方和
sse1=sumsqr(t-y)
%作網絡訓練結果圖
a=[t;y];
c=[1,1,1,1];
plotpv(a,c);
w=[-w,[1]];                                  %將W變為兩維
plotpc(w,-b);