出错

星陨ぜ魂少

??? Undefined function or method 'PathLength' for input arguments of type 'double'.
, o# |( g: v! z* I. G( j  s
0 y4 {7 [  n+ y5 v- _. X6 T5 Z' KError in ==> Metropolis at 10
. j( G/ @# y: p' c$ mR1=PathLength(D,S1);
1 y/ I  H  X0 i) `. w2 t, h1 y这是出现的错误。

代码：function [S,R]=Metropolis(S1,S2,D,T)
* T% T' r( [6 N7 c/ L; [# `S1=[1 4 5 3 2];
S2=[4     1     5     3     2];
D=[      0  116.8118  144.0139   35.3836  146.6322
  116.8118         0  177.7104  151.7267  263.4274
! x$ q7 b5 p  \& v: G, _7 o  i  144.0139  177.7104         0  157.1751  211.6814
, H& }6 _( o0 r6 W4 x8 ~   35.3836  151.7267  157.1751         0  112.2542
6 ]2 R. v! h3 }! B* h5 i  146.6322  263.4274  211.6814  112.2542         0];
# ^% c0 W+ q2 W. jT=1000;
& q( p% ^6 E# |5 q* w+ DR1=PathLength(D,S1);
N=length(S1);
& t: m4 K6 [8 I
R2=PathLength(D,S2);
# N, `5 Y8 x7 ]. \* ]dC=R2-R1;
+ y) z& _% f% Y; m; `if dC<0
2 v+ a5 e7 L% f! G9 Q' t    S=S2;
    R=R2;
. h' K- u" n; _- x/ ^elseif exp(-dC/T)>=rand
    S=S2;
0 A) X, q2 j. m; }# O    R=R2;
! Q9 i, L# B" H" l+ Delse
( F. T' b+ \3 i# n2 J( h  B  s    S=S1;
    R=R1;
5 }" C5 w* X# J, z6 Y% R$ z6 Mend

zjqylcy

我help  了一下  
没有发现有PathLength这个函数   

这个函数是你自己编的吧~~

星陨ぜ魂少

嗯嗯。。。。。