出错

星陨ぜ魂少

??? Undefined function or method 'PathLength' for input arguments of type 'double'.
( J/ I: f" L( k# {/ n
Error in ==> Metropolis at 10
' i1 D" z6 v# J. {6 wR1=PathLength(D,S1);
这是出现的错误。

代码：function [S,R]=Metropolis(S1,S2,D,T)
( L* q2 w3 Y5 x  A) Z: f2 TS1=[1 4 5 3 2];
S2=[4     1     5     3     2];
- Q- [' D# r+ S8 }* B' R; XD=[      0  116.8118  144.0139   35.3836  146.6322
  116.8118         0  177.7104  151.7267  263.4274
  144.0139  177.7104         0  157.1751  211.6814
+ n2 A+ w! d7 ?   35.3836  151.7267  157.1751         0  112.2542
  146.6322  263.4274  211.6814  112.2542         0];
% ?( ^3 l" \) ^" j! [T=1000;
R1=PathLength(D,S1);
7 p  f- g0 c4 W, SN=length(S1);

R2=PathLength(D,S2);
dC=R2-R1;
. O- r) _) d& @& I0 l4 E4 h* h2 Fif dC<0
2 s( {2 k! v( R9 r' `3 h2 ?    S=S2;
. U. `( \+ Z$ a1 P    R=R2;
' P8 g0 c& u) H5 e$ J* ~: Kelseif exp(-dC/T)>=rand
/ ^: R7 R3 |/ G* Z6 \. p( B; P3 U  Q    S=S2;
    R=R2;
% B, i, h+ r# ^: v6 Q6 @, h/ Melse
# s+ T* ]# T( E, K5 r& D    S=S1;
  V3 n* V$ b& x0 N+ Q  p! N4 V& A    R=R1;
* N# e% m2 ?5 ^8 C6 {4 {8 K1 r( jend

zjqylcy

我help  了一下  
, E5 e5 h) D8 J没有发现有PathLength这个函数   

- M; ^) E2 l7 @这个函数是你自己编的吧~~

星陨ぜ魂少

嗯嗯。。。。。