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

s20090281

我最近参考别人的程序写了一个自己的程序但是代入不了fitness函数，请大家指点一下：
, @1 T; x& b& i1 x1 ^我要做的是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最小，
function [out]=fitness(x)
     ai=x(i,           %第几组数据就是取第几个
    a1=ai(1)
    a2=ai(2)
    a3=ai(3)
( n$ V# k# Q8 A/ E    a4=ai(4)
! B  P4 F( S/ ?: a( K! q    u=load('F:\测试记录控制.txt');u1=u(2:399,2);
    y=load('F:\测试记录反馈.txt');y1=y(2:400,2);
  E8 x/ ]6 Y$ |4 R2 ~    c=0;
    for k=3:399
+ \8 F* \" L) k- ~% M3 l/ F        f=[y(k)-a1*y1(k-1)-a2*y1(k-2)-a3*y1(k-3)-b1*u1(k-1)]^2        %求出各级数据的平方和并逐渐相加得到一组对对应变量的适应度        
        c=c+f
  n, T) r0 V( I5 S1 u4 u# z( i        Msum(k)=c
: K, Y5 [, }( V    end
out=Msum(:,k);                %输出适应度
那么在粒子群算法中应如何调用这个函数呢？当位置和速度更新后，怎么计算这时的适应度呢？
5 n3 D% O* i* r6 G* Wfitness(i)=fitness(pop(i,)这样调用为什么会出错呢？请各位帮我这个新手解答一下，谢谢。

s20090281

代表：）

s20090281

问题有新的变化，就是只能进行第一个运算，当计算第二个输入时就会出现??? Subscript indices must either be real positive integers or logicals.
. A  O4 |3 X# X1 z; ^. r- p& n9 a
Error in ==> myPSO at 14
    fitness(i)=fitness(pop(i,)
请问这怎么改呢？