nlsysidenobj.asv

来自「这是一个遗传算法的优化软件」· ASV 代码 · 共 20 行

function tobj=nlsysidenobj(Ti,popsize,lchrom,ts,rin,rout)
global yout time
tobj=0;
P=100;y_1=0;
for k=1:1:P
   time(k)=k;      
   for i=1:1:6
         hu(i)=logsig(Ti(i)*rin(k)+Ti(6+i)*y_1+Ti(12+i)*y_2+Ti(18+i)*u_1+Ti(24+i)*u_2)-0.5;
   end;
   u=hu*Ti(67:72)';
   for i=1:1:6
         hy(i)=logsig(hu*)-0.5;
   end;
   yout(k)=hy*Ti(13:18)';
   error(k)=yout(k)-rout(k);
   y_1=yout(k);
end
tobj=sum(abs(error));
tobj=tobj+1.0e-6;
tobj=10/tobj;