lb=[zeros(30,1)']

for j=1:13

for i=1:30

    [cx0t(:,(j-1)*30+i),cfval0t((j-1)*30+i)]=linprog(-[zeros(30,1);1],[-data0(1:(j+1)*30,1)' 0;data0(1:(j+1)*30,2)' 0;data0(1:(j+1)*30,3)'data0((j-1)*30+i,3);data0(1:(j+1)*30,4)' 0],...

        [-data0((j-1)*30+i,1);data0((j-1)*30+i,2);data0((j-1)*30+i,3);data0((j-1)*30+i,4)],[data0(1:(j+1)*30,5)' 0],[data0((j-1)*30,5)],lb);

   end

for i=1:30 [cxt0(:,(j-1)*30+i),cfvalt0((j-1)*30+i)]=linprog(-[zeros(30,1);1],[-data0(1:j*30,1)' 0;data0(1:j*30,2)' 0;data0(1:j*30,3)' data0(j*30+i,3);data0(1:j*30,4)' 0],...

        [-data0(j*30+i,1);data0(j*30+i,2);data0(j*30+i,3);data0(j*30+i,4)],[data0(1:j*30,5)' 0],[data0(j*30+i,5)],lb);

end

end

a=cfval0t

b=cfvalt0

程序运行显示Subscript indices must either be real positive integers or logicals.

我检查了下标，没有发现问题啊。希望各位大神能够指点一二。