?? yichuanfahua.m
字號:
function [e,y]=yichuanfahua(p,o,endz_indiv)
t=8.*ones(1,8);
t=cumsum(t);
t=[0 t];
xj=zeros(8,1);
xj_1=xj;
e=zeros(1,86);
for k=1:86
Ini = p(k,:)';
yo=0; %放在這里,為了下面命令yo不會把所有樣本的輸出全部疊加
for j=1:8 %隱層節(jié)點(diǎn)數(shù)
sj(j)=endz_indiv(1,t(j)+1:t(j+1))*Ini+endz_indiv(1,(64+j))*xj_1(j);
xj(j)=(1-exp(-sj(j)))/(1+exp(-sj(j)));
yo=yo+xj(j)*endz_indiv(1,72+j);
xj_1(j)=xj(j);
end
y(k)=yo;
e(k) = o(k) - y(k);
end
%[y1]=postmnmx(y,2330.7,2636.8);[o1]=postmnmx(o,2330.7,2636.8);e1=sum(e(1,:).*e(1,:))/86;
%plot([1:86],o1,[1:86],y1,'-r'),axis([1 86 2300 2700]);xlabel('測試樣本'); ylabel('丙烯/ppm');legend('實(shí)際曲線','遺傳算法');
?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -