出错

星陨ぜ魂少

??? Undefined function or method 'PathLength' for input arguments of type 'double'.
+ O- b) U" _- K2 @3 k0 q! E/ k
  T2 ~( g, p* x: i: {4 J0 BError in ==> Metropolis at 10
+ ~* q, r" s) }0 b1 \R1=PathLength(D,S1);
这是出现的错误。
- }) ]2 ~1 [4 c" ~
8 W! M, N9 p5 ?3 n+ T7 b代码：function [S,R]=Metropolis(S1,S2,D,T)
S1=[1 4 5 3 2];
S2=[4     1     5     3     2];
+ i: J) k5 X0 B8 R! R$ O( r% E* aD=[      0  116.8118  144.0139   35.3836  146.6322
  116.8118         0  177.7104  151.7267  263.4274
8 w3 m! u. }0 `1 a9 P; b  144.0139  177.7104         0  157.1751  211.6814
& w' V. N, q" [# z' R   35.3836  151.7267  157.1751         0  112.2542
( j2 [- V1 {9 T4 x3 Y2 A# ~( I; C8 v  146.6322  263.4274  211.6814  112.2542         0];
T=1000;
2 f4 \1 w' _7 W1 ~R1=PathLength(D,S1);
! e" V( \: m. p1 pN=length(S1);

( f9 f; k$ I* {# Q1 R( Q. K: e4 b( _) hR2=PathLength(D,S2);
3 G8 O% V& b8 r" p! A) W5 SdC=R2-R1;
if dC<0
7 J% l( C5 ^* i9 g1 Y    S=S2;
    R=R2;
elseif exp(-dC/T)>=rand
    S=S2;
    R=R2;
else
    S=S1;
    R=R1;
4 k2 M9 ?/ q" ]9 h) Y: Cend

zjqylcy

我help  了一下  
  p" H6 X7 p! |8 T, U4 q没有发现有PathLength这个函数   
! _; J1 ]' c: a. C6 s* F
; Q4 G& Q& J! I" M  o: a* h) z这个函数是你自己编的吧~~

星陨ぜ魂少

嗯嗯。。。。。