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

s20090281

我最近参考别人的程序写了一个自己的程序但是代入不了fitness函数，请大家指点一下：
0 r8 V0 C- U% V$ ^6 _  a3 v我要做的是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,           %第几组数据就是取第几个
5 J: A6 a: ^$ M, B9 C    a1=ai(1)
    a2=ai(2)
' }4 Q: B1 r* m# }6 \" X/ t: e/ b    a3=ai(3)
    a4=ai(4)
    u=load('F:\测试记录控制.txt');u1=u(2:399,2);
    y=load('F:\测试记录反馈.txt');y1=y(2:400,2);
    c=0;
5 ]' d0 J* o4 ]    for k=3:399
        f=[y(k)-a1*y1(k-1)-a2*y1(k-2)-a3*y1(k-3)-b1*u1(k-1)]^2        %求出各级数据的平方和并逐渐相加得到一组对对应变量的适应度        
, ~& q- ^4 L9 {' V        c=c+f
        Msum(k)=c
    end
. A' X$ U" F% \4 vout=Msum(:,k);                %输出适应度
5 R# x  P) m: f) M那么在粒子群算法中应如何调用这个函数呢？当位置和速度更新后，怎么计算这时的适应度呢？
: i$ z$ x- Z  q5 G( r3 xfitness(i)=fitness(pop(i,)这样调用为什么会出错呢？请各位帮我这个新手解答一下，谢谢。

s20090281

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

Error in ==> myPSO at 14
    fitness(i)=fitness(pop(i,)
0 [- ]! D4 R# y  _' ], S- B- E请问这怎么改呢？
6 |+ y* e' X8 ?* R

s20090281

代表：）