da_olt3.m

来自「王小平《遗传算法——理论、应用与软件实现》随书光盘」· M 代码 · 共 33 行

function [ypred,x]=da_olt2(x,xold,coefs,filt,poly);
%
% Non-linear dynamic model
%

%
% Ensure the coefficients are in a column
%
[D L]=size(coefs);
if L > D
	coefs=coefs';
end

%
% Polynomialise the data
%

%
% Filter the data:
%
[D L]=size(x);
for i = 1:L
	x(1,i)=(xold(1,i)*filt(i))+(x(1,i)*(1-filt(i)));
end


%
% Do model
%
ypred=(x.^poly)*coefs;