求助，蒙特卡洛算法

andrewhj

function allcost=Q(z)
clear
a=unifrnd(1000,2000,1,4);
+ t: `' F& |8 y, Dfor i=1:4
- G# {7 w& D& o) w  V; W    for j=4:-1:i+1
        if a(j)<a(j-1)
% h; Y3 A" l3 P/ U& u5 l            m=a(j);a(j)=a(j-1);a(j-1)=m;
        end
    end
end
5 Z! Y. A4 r) g9 `0 E- u7 ^) nb=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;
# P7 F# b% L5 F0 r- u# s2 \8 s$ X    a(4)=r+unifrnd(1000,2000);
    for i=1:4
        for j=4:-1:i+1
$ v- ]) s/ \3 L4 |2 `            if a(j)<a(j-1)
                n=a(j);a(j)=a(j-1);a(j-1)=n;
  P; B7 a9 Y3 t, O            end
; z0 V9 X4 }# o& c        end
    end
    amin=a(1);
    k1=k1+1;
- y4 _! |/ b: s. @8 Hend
while bmin<t
    b(1)=bmin+unifrnd(1000,2000)+2;
    b(2)=bmin+unifrnd(1000,2000)+2;
) y5 x! v% M* c* t3 B2 W) m) h    b(3)=bmin+unifrnd(1000,2000)+2;
! ]8 d& ?3 ?5 K' A1 f( s    b(4)=bmin+unifrnd(1000,2000)+2;
& s6 y/ Q7 U' m' S* l    bmin=min(b);
    k2=k2+1;
) B. ]9 }+ y4 A+ u. J1 uend
x1=k1*30;
x2=k2*80;
allcost=[x1,x2]
3 @9 s$ D% I, E- y2 h- }
  E" u2 |) Y+ r! r调用该函数无法运行，显示“Reference to a cleared variable z.”
不明白请高手指教，谢谢

madio

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