-
大小: 3KB文件類型: .m金幣: 1下載: 1 次發(fā)布日期: 2021-05-29
- 語(yǔ)言: Matlab
- 標(biāo)簽: 模糊??神經(jīng)網(wǎng)絡(luò)??逼近??MATLAB??
資源簡(jiǎn)介
本程序用模糊神經(jīng)網(wǎng)絡(luò)逼近數(shù)學(xué)函數(shù),已經(jīng)在MATLAB上運(yùn)行通過(guò),有興趣的朋友可以參考一下。
代碼片段和文件信息
%模糊神經(jīng)網(wǎng)絡(luò)逼近函數(shù)
clear?all
close?all
rank=8;
step=20;%循環(huán)次數(shù)
FF2=zeros(2*rank1);
W=ones(1rank*rank);%權(quán)值
WK1=W;
WK2=W;
WW=zeros(rank*rank1);
gama=0.618;%記憶權(quán)值
beta=0.7;%學(xué)習(xí)步長(zhǎng)
for?x1=-1:0.1:1
????for?x2=-1:0.1:1
????????%第一層的輸入
????????input1=[x1x2]‘;
????????FF2=[-1?-0.7?-0.4?-0.1?0.1?0.4?0.7?1;?-1?-0.7?-0.4?-0.1?0.1?0.4?0.7?1];
????????width=[0.7?0.7?0.7?0.7?0.7?0.7?0.7?0.7??;0.7?0.7?0.7?0.7?0.7?0.7?0.7?0.7??];%隸屬度寬度
????????XX2=zeros(length(input1)rank);
????????for?i=1:length(input1)
????????????for?j=1:rank
????????????????XX2(ij)=-(input1(i)-FF2(ij))^2/width(ij)^2;
????????????end
????????end;
????????miu=exp(XX2);
????????for?i=1:length(input1)
????????????for?j=1:rank
????????????????if?miu(ij)<0.1
????????????????????miu(ij)=0;
????????????????end
????????????end
????????end?
????????FF3=zeros(rankrank);
????????for?i=1:rank
????????????for?j=1:rank
????????????????FF3(ij)=min(miu(1i)miu(2j));
????????????end
????????end;
????????FF4=zeros(rankrank);
????????temp=0;
????????for?i=1:rank
????????????for?j=1:rank
????????????????temp=temp+FF3(ij);
????????????end
????????end
????????for?i=1:rank
????????????for?j=1:rank
????????????????FF4(ij)=FF3(ij)/temp;
????????????end
????????end
????????XX4=zeros(rank*rank1);
????????XX4=reshape(FF4rank*rank1);
????????t=sin(x1*pi)*sin(pi*x2);
????????for?train=1:step
????????????YY=W*XX4;
????????????for?j=1:length(W)
????????????????W(j)=WK1(j)+beta*(t-YY)*XX4(j)+gama*(WK1(j)-WK2(j));
????????????end
????????????WK2=WK1;
????????????WK1=W;
????????end
????????WW=[WWW‘];
????end
end
%訓(xùn)練結(jié)束
YY=0;
GG=0;
K
評(píng)論
共有 條評(píng)論