求助，蒙特卡洛算法

andrewhj

function allcost=Q(z)
clear
a=unifrnd(1000,2000,1,4);
for i=1:4
) f" J8 M( Y4 D6 F" m    for j=4:-1:i+1
        if a(j)<a(j-1)
7 m" ^. F+ S+ {# `. a            m=a(j);a(j)=a(j-1);a(j-1)=m;
        end
    end
* ]/ P  X" n+ R4 l( c5 k4 T! ?end
* E1 o! {- Z6 @8 }! jb=a;
2 X- z: J5 M  st=z
( H  t1 m. b7 xk1=0;k2=0;
amin=a(1);bmin=b(1);
3 I, R3 W9 J4 T% J* A2 {while amin<t
    r=a(1)+1;a(1)=a(2)+1;a(2)=a(3)+1;a(3)=a(4)+1;
; y0 z) d, l4 w; x: _  I    a(4)=r+unifrnd(1000,2000);
- O% ^5 ^& L  x; G5 J    for i=1:4
        for j=4:-1:i+1
3 O. G, T& n: x- ~1 O( O            if a(j)<a(j-1)
                n=a(j);a(j)=a(j-1);a(j-1)=n;
; C" Q% B* f- F% r( b% z            end
        end
$ }5 u/ f9 P, M) n& @2 `    end
9 L' `4 O! K# g( n! P1 @5 W    amin=a(1);
    k1=k1+1;
end
) d8 P0 V4 X9 D% R6 L( S/ uwhile bmin<t
1 A0 j7 O3 m) C% Y8 E    b(1)=bmin+unifrnd(1000,2000)+2;
    b(2)=bmin+unifrnd(1000,2000)+2;
0 x/ w9 i0 W1 ]) b/ m    b(3)=bmin+unifrnd(1000,2000)+2;
    b(4)=bmin+unifrnd(1000,2000)+2;
    bmin=min(b);
    k2=k2+1;
! Y0 [9 L& d/ _! Pend
x1=k1*30;
x2=k2*80;
; K  ], O9 u. z/ n$ hallcost=[x1,x2]

调用该函数无法运行，显示“Reference to a cleared variable z.”
0 s9 I- y* k; Y- U# _. d不明白请高手指教，谢谢

madio

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