gusucode.com > 《MATLAB神经网络超级学习手册》随书光盘源码程序 > code/8/N8_5_1.m

    clc
clear all

%%%%%%%%产生输入变量x1 x2%%%%%%%%%%%%%%%
x1=-1:0.01:1;
x2=-1:0.01:1;

%%%%%%%%产生输出变量y%%%%%%%%%%%%%%%%%%
y=30+x1.^2-5*cos(2*pi*x1)+3*x2.^2-5*cos(2*pi*x2); 

%%%%%%%%建立RBF网络%%%%%%%%%%%%%%%%%%%%
net=newrbe([x1;x2],y)

%%%%%%%%网络仿真%%%%%%%%%%%%%%%%%%%%%%%
t=sim(net,[x1;x2]);

%%%%%%%%绘制拟合效果图%%%%%%%%%%%%%%%%%
figure(1)
plot3(x1,x2,y,'rd');
hold on;
plot3(x1,x2,t,'b-.');
view(100,25)
title('RBF神经网络的拟合效果')
xlabel('x1')
ylabel('x2')
zlabel('y')
grid on