最简单的径向基网络
最简单的径向基网络
%%最简单的径向基网络 close all clc x=[-1:0.05:-0.05 0.05:0.05:1];% 扣除‘0’的不可除 y=sin(pi*x)./(pi*x); aa=length(x); for i=1:aa for j=1:aa z(i,j)=y(i).*y(j); end end %%%%%%%%%%%%%%%%%%%% 创建网络 goal=1e-10; % 误差指标 sp=1; % 扩展常数 mn=20; % 神经元的最多个数 df=1; %训练过程的显示频率 net=newrb(x,z,goal,sp,mn,df); % 对网络进行仿真,并画出样本数据和网络输出图形 Y=sim(net,x); figure; mesh(z); figure; mesh(Y); E=z-Y; figure; mesh(E);