line_neuro.m

来自「人工神经网络资料」· M 代码 · 共 21 行

 clear
P=[0.8 -2];
T=[0.5 1];
w_range=-1:0.1:1
b_range=-1:0.1:1
ES=errsurf(P,T,w_range,b_range,'purelin')
plotes(w_range,b_range,ES)
pause 
clc
net=newlind(P,T)
pause
clc
A=sim(net,P)
E=T-A
SSE=sse(E)
pause
clc
plotes(w_range,b_range,ES)
plotep(net.IW{1},net.b{1},SSE)
echo off