24小时热门版块排行榜    

CyRhmU.jpeg
查看: 1947  |  回复: 8

060930115

铁虫 (初入文坛)

[求助] matlab一段程序好像陷入死循环了。。。。求跳出

function n=SL(~)
N=10;
n=1;m=0;r=1;
clu=zeros(N+2,N+2);
A=rand(1,1);B=rand(1,1);
X=round(A*(N-1)+2);
Y=round(B*(N-1)+2);
clu(X,Y)=1;
while   r>0

   Z1=rand(1,1);W1=rand(1,1);
   z=round(Z1*(N-1)+2);w=round(W1*(N-1)+2);
  if clu(z,w)==clu(z+1,w)==clu(z-1,w)==clu(z,w+1)==clu(z,w-1)==0   
      clu(z,w)=n+1;     n=n+1;
  elseif max(max(clu(z+1,w),clu(z-1,w)), max(clu(z,w+1),clu(z,w-1)))==1
      clu(z,w)=1;

  elseif min(min(clu(z+1,w),clu(z-1,w)),min(clu(z,w+1),clu(z,w-1)))>=1
      t=min(min(clu(z+1,w),clu(z-1,w)),min(clu(z,w+1),clu(z,w-1)));
      clu(z,w)=t; clu(z+1,w)=t; clu(z-1,w)=t;  clu(z,w+1)=t;  clu(z,w-1)=t;
  else clu(z+1,w)-1&&clu(z-1,w)-1&&clu(z,w+1)-1&&clu(z,w-1)-1;
      clu(z,w)=1;
      if clu(z,w)==1&&clu(z+1,w)-1>=0 clu(z+1,w)=1; end
      if clu(z,w)==1&&clu(z-1,w)-1>=0 clu(z-1,w)=1; end
      if clu(z,w)==1&&clu(z,w+1)-1>=0 clu(z,w+1)=1; end
      if  clu(z,w)==1&&clu(z,w-1)-1>=0 clu(z,w-1)=1;
      end
         
  end
  r=0;r1=1;r2=1;r3=1;r4=1;
    for i=2:N+1
             if clu(2,i)==1
                r1=0;
             end
             if clu(N+1,i)==1
                r2=0;
             end
             if clu(i,2)==1
                r3=0;
             end
             if clu(i,N+1)==1
                r4=0;
             end     
   
      r=r1+r2+r3+r4;
    end
end   
   for i=2:N+1
              for j=2:N+1
                    if clu(i,j)~=0
                       m=m+1;  
                    end
              end
   end

m;
p=m/(N*N);
A=clu(2:N+1,2:N+1);
p;
回复此楼

» 猜你喜欢

» 本主题相关价值贴推荐,对您同样有帮助:

已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

jiannywang

金虫 (正式写手)

看不懂。。。。
2楼2012-05-21 20:51:22
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

baobiao007

木虫 (职业作家)

中国特色


zhangguangping: 金币+1, 谢谢提示! 2012-05-22 16:03:48
楼主可以通过在各段插入打印语句来缩小查错范围。 也可以通过条件编译来定位第几次循环出错
我同意叔本华的观点,人们投身艺术和科学领域的强烈愿望之一就是逃离痛苦、残酷和枯燥无味的现实生活,逃离自己飘忽不定的七情六欲的桎梏。--爱因斯坦
3楼2012-05-21 23:35:52
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

沈晨

铜虫 (小有名气)

【答案】应助回帖


感谢参与,应助指数 +1
zhangguangping: 金币+1, 谢谢提示! 2012-05-22 16:03:39
你可以限制循环次数,这样可以1避免死循环

[ 发自手机版 http://muchong.com/3g ]
4楼2012-05-22 07:13:51
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

csgt0

荣誉版主 (著名写手)

彩色挂图

【答案】应助回帖


感谢参与,应助指数 +1
zhangguangping: 金币+1, 谢谢帮主 2012-05-22 16:03:26
没死啊,我运行几次都没问题
>> SL

ans =

    39

>> SL

p =

    0.4400


ans =

    43

>> SL

p =

    0.5200

>>

» 本帖已获得的红花(最新10朵)

showmethemoney
5楼2012-05-22 13:59:40
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

060930115

铁虫 (初入文坛)

送鲜花一朵
引用回帖:
5楼: Originally posted by csgt0 at 2012-05-22 13:59:40:
没死啊,我运行几次都没问题
>> SL

ans =

    39

>> SL

p =

    0.4400


ans =

    43

>> SL

p =

    0.5200

>>

e....敢问多少时间出来的?为什么我的要用好久还不出来,我的是2010B的。。。
6楼2012-05-22 15:08:52
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

csgt0

荣誉版主 (著名写手)

彩色挂图

【答案】应助回帖

★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★
zhangguangping: 金币+2, 谢谢应助! 2012-05-22 16:02:59
060930115: 金币+10, ★★★很有帮助 2012-05-22 18:53:26
我用的2011b

>> SL

p =

    7.300000000000000e-001

Elapsed time is 0.004795 seconds.
>> SL

p =

    4.400000000000000e-001

Elapsed time is 0.001737 seconds.
>> SL

p =

    5.400000000000000e-001

Elapsed time is 0.002531 seconds.
>> SL

p =

    5.300000000000000e-001

Elapsed time is 0.004408 seconds.
>> SL

p =

    4.600000000000000e-001

Elapsed time is 0.001789 seconds.
>> SL

p =

    3.900000000000000e-001

Elapsed time is 0.001462 seconds.
>> SL

p =

    4.300000000000000e-001

Elapsed time is 0.001943 seconds.
>> SL

p =

    8.400000000000000e-001

Elapsed time is 0.004477 seconds.
>> SL

p =

    5.700000000000000e-001

Elapsed time is 0.002420 seconds.
showmethemoney
7楼2012-05-22 15:22:17
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

060930115

铁虫 (初入文坛)

引用回帖:
7楼: Originally posted by csgt0 at 2012-05-22 15:22:17:
我用的2011b

>> SL

p =

    7.300000000000000e-001

Elapsed time is 0.004795 seconds.
>> SL

p =

    4.400000000000000e-001

Elapsed time is 0.001737 seconds.
>> S

好吧,看来是我的有点问题,不过还好了~谢谢你了
8楼2012-05-22 18:53:19
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

zunguangg

木虫 (正式写手)

同时按下Ctrl+C 键
天道酬勤
9楼2012-05-23 23:28:18
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 060930115 的主题更新
信息提示
请填处理意见