time.m

TSP问题,即旅行商问题,matlab环境下可以运行

function cost_time=time(v,l)
global demand;
global depot;
global customer;
global ET;
global LT;
global S;
global La;
global Ea;
global sudu;
 T=zeros(1,customer+depot);
cost_time=0;

T(v(2))=distance(demand,v(1)+depot,v(2))/sudu;

if l>2
    for j=3:l+1
        T(v(j))=T(v(j-1))+distance(demand,v(j-1),v(j))/sudu+S(v(j-1));%到第j个顾客的时间
    end
end

T(v(1)+customer)=distance(demand,v(l+1),v(1))/sudu+S(v(l+1))+T(v(l+1));


%if T(v(1)+customer)<ET(v(1)+customer)
  %  cost_time=cost_time+(ET(v(1)+customer)-T(v(1)+depot))*Ea;
  %elseif  T(v(1)+customer)>LT(v(1)+customer)
    % cost_time=cost_time+(T(v(1)+customer)-LT(v(1)+depot))*La;
    %end

for j=2:l+1
       if T(v(j))<ET(v(j))
            cost_time=(ET(v(j))-T(v(j)))*Ea+cost_time;
        elseif T(v(j))>LT(v(j))
            cost_time=(T(v(j))-LT(v(j)))*La+cost_time;
        end
    end