粒子群算法中适应度函数的调入

s20090281

我最近参考别人的程序写了一个自己的程序但是代入不了fitness函数，请大家指点一下：
. N& w, e* i+ D2 `- v( w2 m我要做的是y(k)=a1*y(k-1)+b1*u(k-1)+a2*y(k-2)+a3*y(k-3)函数求a1,a2,a3,b1.已知y和u，我把适应度取为399组数据的【y(k)-a1*y(k-1)-b1*u(k-1)-a2*y(k-2)-a3*y(k-3)】^2最小，
* d+ M! V  f- }: Q( f6 d" @function [out]=fitness(x)
     ai=x(i,           %第几组数据就是取第几个
    a1=ai(1)
& Z/ Y, T1 d) m0 W' `5 S    a2=ai(2)
( K9 [3 f' F" \6 U* Y9 Y% O    a3=ai(3)
    a4=ai(4)
" K- q% g1 `! J  I( N9 o$ ~+ b    u=load('F:\测试记录控制.txt');u1=u(2:399,2);
% p* m* F$ |& C. E: B    y=load('F:\测试记录反馈.txt');y1=y(2:400,2);
0 K% M4 o: G  K5 d    c=0;
    for k=3:399
        f=[y(k)-a1*y1(k-1)-a2*y1(k-2)-a3*y1(k-3)-b1*u1(k-1)]^2        %求出各级数据的平方和并逐渐相加得到一组对对应变量的适应度        
        c=c+f
6 g  Y9 w1 v; O& ]" s* W9 D' H        Msum(k)=c
. y  Q6 v3 c7 m! p# [( t0 z7 i' X0 l    end
out=Msum(:,k);                %输出适应度
那么在粒子群算法中应如何调用这个函数呢？当位置和速度更新后，怎么计算这时的适应度呢？
2 v' J5 q. A' j* _! xfitness(i)=fitness(pop(i,)这样调用为什么会出错呢？请各位帮我这个新手解答一下，谢谢。

s20090281

代表：）

s20090281

问题有新的变化，就是只能进行第一个运算，当计算第二个输入时就会出现??? Subscript indices must either be real positive integers or logicals.

' @* ]" W! [& F; Q0 K- g9 R/ pError in ==> myPSO at 14
  ?& k& M% |/ F; e5 s2 n    fitness(i)=fitness(pop(i,)
请问这怎么改呢？
3 Z4 Z: w2 X$ J2 ^3 b