第5章作业程序

2021年3月27日星期六
2020级系统科学研究生李增伟编制的程序：第5章作业
clc,clear
rate = 0.003;
p = [1 1 2 2 -1 -2 -1 -2;1 2 -1 0 2 1 -1 -2];
t = [-1 -1 -1 -1 1 1 1 1;-1 -1 1 1 -1 -1 1 1];
P=[p(1,:);p(2,:);ones(1,8)];
w = [1 0 1;0 1 1];
for j = 1:40
for i = 1:8
a_value = w*P(:,i);
Error = t(:,i) - a_value;
w_new = w + 2 * rate * Error * P(:,i)';
w = w_new;
end
end
plot(p(1,1:2),p(2,1:2),'o','MarkerSize',10);
hold on
plot(p(1,3:4),p(2,3:4),'p','MarkerSize',10);
hold on
plot(p(1,5:6),p(2,5:6),'s','MarkerSize',10);
hold on
plot(p(1,7:8),p(2,7:8),'h','MarkerSize',10);
hold on
refline(w(1,2)/w(1,1),w(1,3))
refline(w(2,2)/w(2,1),w(2,3))

分类图