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

s20090281

我最近参考别人的程序写了一个自己的程序但是代入不了fitness函数，请大家指点一下：
我要做的是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最小，
% s5 K1 u7 Y* h9 U! ~, Gfunction [out]=fitness(x)
     ai=x(i,           %第几组数据就是取第几个
    a1=ai(1)
! K: ~1 O( f( P9 g  t4 D    a2=ai(2)
    a3=ai(3)
    a4=ai(4)
, ^# `  e2 k- K, C6 Y: Z    u=load('F:\测试记录控制.txt');u1=u(2:399,2);
7 `' y: _( i. I5 P# f- o    y=load('F:\测试记录反馈.txt');y1=y(2:400,2);
- z2 \+ p. `+ M2 [: j- W" ]0 ?( K    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        %求出各级数据的平方和并逐渐相加得到一组对对应变量的适应度        
% B7 n- V) a, _) P# x: @        c=c+f
        Msum(k)=c
    end
out=Msum(:,k);                %输出适应度
/ n' E8 V( e6 u$ r- {% O那么在粒子群算法中应如何调用这个函数呢？当位置和速度更新后，怎么计算这时的适应度呢？
* E% f. @: b) m/ E4 i, r7 t- ^. Afitness(i)=fitness(pop(i,)这样调用为什么会出错呢？请各位帮我这个新手解答一下，谢谢。

s20090281

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

; @8 c$ A: a: x6 iError in ==> myPSO at 14
    fitness(i)=fitness(pop(i,)
7 f8 b3 B. u8 V+ G请问这怎么改呢？

s20090281

代表：）