求助，蒙特卡洛算法

andrewhj

function allcost=Q(z)
1 a0 _  {+ Q" ^8 h  R. @. xclear
a=unifrnd(1000,2000,1,4);
4 U4 R2 U! E$ ~  O" [/ pfor i=1:4
    for j=4:-1:i+1
  \6 |- q- y/ q9 k* c        if a(j)<a(j-1)
            m=a(j);a(j)=a(j-1);a(j-1)=m;
8 ?0 b% {/ H2 T/ G' J. C        end
    end
end
, U5 t( ]5 Q1 B0 H  L9 l: g( o+ ]b=a;
t=z
k1=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);
# d. Q# {& S. B+ J3 k  J$ m  ?    for i=1:4
        for j=4:-1:i+1
            if a(j)<a(j-1)
                n=a(j);a(j)=a(j-1);a(j-1)=n;
( S& C: O& D: ~3 `  Y            end
) d/ U# {4 s4 w) m4 o; n        end
' c; v$ M5 _- R  u% i- u2 A    end
% |" m) x; b, y& B% w) D- U    amin=a(1);
1 q, Y1 S5 D  g    k1=k1+1;
" H2 N0 T+ R3 I/ T; Gend
while bmin<t
    b(1)=bmin+unifrnd(1000,2000)+2;
" J" {4 N* J- {8 P    b(2)=bmin+unifrnd(1000,2000)+2;
    b(3)=bmin+unifrnd(1000,2000)+2;
" n5 _$ ^, U- T5 v! ]" c    b(4)=bmin+unifrnd(1000,2000)+2;
    bmin=min(b);
) R! z! h" S3 o4 T. y, R    k2=k2+1;
end
x1=k1*30;
x2=k2*80;
allcost=[x1,x2]
5 B3 H8 a: C  y) w4 ^9 c+ {
调用该函数无法运行，显示“Reference to a cleared variable z.”
不明白请高手指教，谢谢

madio

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