本文共 1723 字,大约阅读时间需要 5 分钟。
给定输入向量 p = − 1 : 0.1 : 1 p=-1:0.1:1 p=−1:0.1:1和目标向量 [ t = 0.0596 0.6820 0.0424 0.0714 0.5216 0.0967 0.8181 0.8175 0.7224 0.1499 0.6596 0.5186 0.9730 0.6490 0.8003 0.4538 0.4324 0.8253 0.0835 0.1332 ] \begin{bmatrix} t = 0.0596 & 0.6820 & 0.0424 & 0.0714 & 0.5216 & 0.0967 & 0.8181 & 0.8175 & 0.7224 & 0.1499 & 0.6596 & 0.5186 & 0.9730 & 0.6490 & 0.8003 & 0.4538 & 0.4324 & 0.8253 & 0.0835 & 0.1332\end{bmatrix} [t=0.05960.68200.04240.07140.52160.09670.81810.81750.72240.14990.65960.51860.97300.64900.80030.45380.43240.82530.08350.1332],设计一个RBF神经网络,完成 y = f ( x ) y=f(x) y=f(x)。
% 创建、训练、存储RBF神经网络clear all; % 清除所有内存变量clc; % 清屏p = -1:0.1:0.9; % 输入向量t = [0.0596 0.6820 0.0424 0.0714 0.5216 0.0967 0.8181 0.8175... 0.7224 0.1499 0.6596 0.5186 0.9730 0.6490 0.8003 0.4538... 0.4324 0.8253 0.0835 0.1332]; % 目标向量net = newrb(p,t,0.01,0.01,20,3); % 设计径向基网络 save net61 net % 存储训练后的网络a%%% RBF神经网络仿真load net61 net; % 加载训练后的网络i = -1:0.05:0.9; % 测试样本r = sim(net,i); % 仿真结果figure('NumberTitle','off','Name','RBF神经网络案例一'); %修改窗口标题hold on;plot(p,t,'k'); % 绘制训练样本图形plot(i,r,'o'); % 绘制函数拟合曲线hold off;
网络训练的误差性能曲线和曲线拟合仿真结果如图所示:
newrb用于设计径向基网络
net = newrb(P,T,goal,spread,MN,DF)[net,tr] = newrb(P,T,goal,spread,MN,DF)
newrb()函数设计的径向基网络net可用于函数逼近。
转载地址:http://mcoo.baihongyu.com/