%例5.2,hop2.m
%
T=[1 1 -1;
   1 -1 1;
   1 -1 -1;
   1 1 -1;
   1 -1 -1];
a=[];w=zeros(5);     %初始化矩陣
for i=1:3
    a=T(:,i)*T(:,i)';
    w=a+w-eye(5);    %應用海布學習法則的權值
end
W = w
Y=hardlims(w*T)      %輸出結果