【正文】 end end for i=1:ee for j=1:rr if ttt(i,j)==0。 end end end for i=1:ee for j=1:rr if i==j。 end end end (費用直達矩陣 ) [ee,rr]=size(S)。 for i=1:ee for j=1:rr if S{i,j}~=0 ppp(i,j)=min(S{i,j}(:,2))。 ttt(i,j)=Inf。 ppp(i,j)=0。n=size(D,1)。 for i=1:n for j=1:n if D(i,j)~=inf path(i,j)=j。 end end for k=1:n for i=1:n for j=1:n if D(i,k)+DO(k,j)D(i,j) D(i,j)=D(i,k)+DO(k,j)。 end if D(i,k1)+DO(k1,j)D(i,j) D(i,j)==inf。 k end,end end end end if nargin==3 min1=D(start,terminal)。 i=1。 while path(m(i),terminal)~=terminal k=i+1。 i=i+1。 path1=m。B2021data/ 地鐵 T1 線換乘公汽信息 .txt39。r39。 i=1。 if ~ischar(tline), break, end if strcmp(tline,39。) continue end if strcmp(tline(1),39。) D{i,1}=tline(5:end)。 end end fclose(fid)。B2021data/ 地鐵 T2 線換乘公汽信息 .txt39。r39。 while 1 tline = fgetl(fid)。39。D39。 i=i+1。 tx=[1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22, 23,24,25,... 26,12,27,28,29,30,31,32,18,33,34,35,36,37,38,39]+3957。39。39。S39。 end for j=24:41 DL{2,1}=strcat(DL{2,1},39。,num2str(tx(j)))。S39。 for i=1:1040 for j=1:41 tline=D{j,1}。S39。 for k=1:length(t) L{i,4}=regexprep(L{i,4}, strcat(39。,tline(t(k)+1:t(k)+4)),... strcat(39。,num2str(tx(j))))。 Lt1{1041,1}=39。 Lt1{1041,2}=3。來回 139。 Lt1{1042,1}=39。 Lt1{1042,2}=3。來回 239。 Lt1{1043,1}=39。 Lt1{1043,2}=3。環(huán)行 139。 Lt1{1044,1}=39。 Lt1{1044,2}=3。環(huán)行 239。 for i=1:1044 tline=Lt1{i,4}。S39。 temp=zeros(1,length(t))。來回 239。環(huán)行 239。 end else for j=1:length(t) temp(j)=str2double(tline(t(j)+1:t(j)+4))。 end N=87。 % 直達 if Time(N,M)~=0 temp=S{N,M}。直達車為 :L39。 T2=Time(N,:).*Time(:,M)39。 t=t(T2~=0)。 t2=S{t(i),M}。 t2=double(t2)。%轉(zhuǎn)站次數(shù) U(x,2)=(t1(j,3)+t2(k,3))*3+5+3。%轉(zhuǎn)站點 U(x,4:5)=[t1(j,1) t2(k,1)]。 for k1=1:1040 if str2double(L{k1,1}(2:end))==U(x,5) if L2{k1,1}(1,1)==t(i) temp=1。 U(x,7)=sum(Time(:,t(i)))+... sum(Time(t(i),:))。%費用 x=x+1。 x=1。amp。 t2=S{i,j}。 t1=double(t1)。 t3=double(t3)。%轉(zhuǎn)站次數(shù) %總時間 U2(x,2)=(t1(k1,3)+t2(k2,3)+t3(k3,3))*3+10+3。%轉(zhuǎn)站點 U2(x,4)=t(j)。%車輛 1,2 %是否始發(fā) temp=0。 break end end end U2(x,7)=t3(k3,1)。 break end end end U2(x,8)=temp。 %費用 U2(x,10)=t1(k1,2)+t2(k2,2)+t3(k3,2)。 end end end end end end end N=39。 M=39。 % 映射 if strcmp(N(1),39。) for i=1:41 t=findstr(D{i,1},N)。 break end end if ischar(N) N=str2double(N(2:end))。S39。 if ~isempty(t) M=tx(i)。 end end % 直達 if Time(N,M)~=0 temp=S{N,M}。直達地鐵為 :39。直達汽車為 :39。 T2=Time(N,:).*Time(:,M)39。 t=t(T2~=0)。 t2=S{t(i),M}。 t2=double(t2)。%轉(zhuǎn)站次數(shù) U{x,8}=t1(j,2)+t2(k,2)。%d d U{x,8}=3。%d g end else if t2(k,1)1040 U{x,2}=t1(j,3)*3+t2(k,3)*+6+3。%g g end end U{x,3}=Cit{t(i)}。%車輛 U{x,5}=Lt1{t2(k,1),1}。 if t2(k,1)=1040 for k1=1:1040 if strcmp(Lt1{k1,1},U{x,5}) if Lt2{k1,1}(1,1)==t(i) temp=1。 U{x,7}=sum(Time(:,t(i)))+... sum(Time(t(i),:))。 end end end return end %二次轉(zhuǎn)車 t=1:3996。 for i=1:3996 if Time(N,i)~=0 for j=1:3996 if Time(j,M)~=0 amp。 Time(i,j)~=0 t1=S{N,i}。 t3=S{j,M}。 t2=double(t2)。 for k1=1:size(t1,1) for k2=1:size(t2,1) for k3=1:size(t3,1) U2{x,1}=2。 U2{x,10}=3。 U2{x,10}=3+t3(k3,2)。 U2{x,10}=6+t2(k2,2)。 U2{x,10}=3+t2(k2,2)+t3(k3,2)。 U2{x,10}=t1(k1,2)+3。 U2{x,10}=3+t1(k1,2)+t3(k3,2)。 U2{x,10}=3+t1(k1,2)+t2(k2,2)。 U2{x,10}=t1(k1,2)+t2(k2,2)+t3(k3,2)。%轉(zhuǎn)站點 U2{x,4}=Cit{t(j)}。%車輛 1 U2{x,6}=Lt1{t2(k2,1),1}。 if t2(k2,1)=1040 for kk=1:1040 if strcmp(Lt1{kk,1},U2{x,6})