出错

星陨ぜ魂少

??? Undefined function or method 'PathLength' for input arguments of type 'double'.

( X$ m; i* s: L  P- rError in ==> Metropolis at 10
R1=PathLength(D,S1);
3 |/ t9 a7 h2 F这是出现的错误。
/ k. o2 E$ X$ L# Z9 i* O) R
代码：function [S,R]=Metropolis(S1,S2,D,T)
2 X; Q; d$ ~( b6 T; Z& |S1=[1 4 5 3 2];
5 ^0 [+ f3 ]' W! [S2=[4     1     5     3     2];
2 i- {" b, s3 R* S0 k# C( S& rD=[      0  116.8118  144.0139   35.3836  146.6322
7 C& {! {! U, E0 F) i. z! ~  116.8118         0  177.7104  151.7267  263.4274
  144.0139  177.7104         0  157.1751  211.6814
   35.3836  151.7267  157.1751         0  112.2542
  146.6322  263.4274  211.6814  112.2542         0];
1 Z$ A! T% Q; S, R; h; }% w9 A9 r$ FT=1000;
R1=PathLength(D,S1);
2 v+ Q+ ]) v) K9 i8 B  E$ o: GN=length(S1);

  Q- C/ t5 {( rR2=PathLength(D,S2);
dC=R2-R1;
5 H) |/ f+ M1 V" a+ Fif dC<0
/ [' V2 a. q' \( v) b    S=S2;
) O9 @6 g2 N$ h5 c    R=R2;
8 U$ f. P  c/ {& R- V/ welseif exp(-dC/T)>=rand
    S=S2;
    R=R2;
else
    S=S1;
$ ~3 T& m+ P* _* d- W. H: b4 `    R=R1;
+ x% W% ]' F7 ~end

zjqylcy

我help  了一下  
* F1 u( B( i/ e* F没有发现有PathLength这个函数   
" I2 ]3 L' H( p$ K8 E4 W0 h3 G
这个函数是你自己编的吧~~

星陨ぜ魂少

嗯嗯。。。。。