求助，蒙特卡洛算法

andrewhj

function allcost=Q(z)
$ R8 i. E' G6 c5 x4 X$ Wclear
2 J- W/ a' L( e# Na=unifrnd(1000,2000,1,4);
" E) E; i3 j: R: m2 Gfor i=1:4
: M, I" W9 G0 K3 k    for j=4:-1:i+1
& f9 q' i, E0 b# a        if a(j)<a(j-1)
            m=a(j);a(j)=a(j-1);a(j-1)=m;
, }8 J% m8 n" Y! m# R2 b9 S        end
    end
* G. Y2 h% l( E( L7 [8 S! gend
. |6 `5 {+ l+ i& Wb=a;
t=z
+ V8 |8 z7 u" ck1=0;k2=0;
amin=a(1);bmin=b(1);
while amin<t
    r=a(1)+1;a(1)=a(2)+1;a(2)=a(3)+1;a(3)=a(4)+1;
    a(4)=r+unifrnd(1000,2000);
    for i=1:4
        for j=4:-1:i+1
  v* x! B! n0 M' K6 k            if a(j)<a(j-1)
                n=a(j);a(j)=a(j-1);a(j-1)=n;
: g  B2 n6 w. z            end
        end
  H) I0 \6 M# k. z  m    end
4 ^$ u0 ]: c& w  i1 d. C- i+ p. k+ m    amin=a(1);
% O( ~/ Y! r2 O" ?+ |9 d    k1=k1+1;
end
while bmin<t
' g8 T3 J2 L# d9 v( x2 o    b(1)=bmin+unifrnd(1000,2000)+2;
# Q" e' b5 m$ L8 X% B3 e    b(2)=bmin+unifrnd(1000,2000)+2;
' ?3 o* A& M$ f3 ?6 Z/ e    b(3)=bmin+unifrnd(1000,2000)+2;
. i  [7 J/ \  H1 N9 t+ O4 d    b(4)=bmin+unifrnd(1000,2000)+2;
    bmin=min(b);
    k2=k2+1;
end
) V& X3 w* A/ qx1=k1*30;
2 q$ e, Z8 J2 V5 n1 S' D. ux2=k2*80;
allcost=[x1,x2]
2 e, R4 Q* l; \% b
" I4 O/ T; }+ G( H$ f8 n调用该函数无法运行，显示“Reference to a cleared variable z.”
不明白请高手指教，谢谢

madio

你在前面用clear把内存清理了，当然z没有值了！这个地方只想清理工作区应该用clc