24小时热门版块排行榜

返回列表

当前只显示满足指定条件的回帖，点击这里查看本话题的所有回帖

060930115

铁虫 (初入文坛)

应助: 0 (幼儿园)
金币: 52.5
散金: 15
帖子: 20
在线: 1.8小时
虫号: 1741619
注册: 2012-04-07
性别: GG
专业: 工程热物理相关交叉领域

[求助] 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;

回复此楼

» 猜你喜欢

新西兰Robinson研究所招收全奖PhD 已经有0人回复
石墨烯转移--二氧化硅衬底石墨烯已经有0人回复
物理学I论文润色/翻译怎么收费? 已经有93人回复
笼目材料中量子自旋液体基态的证据已经有0人回复
数学教学论硕士可以读数学物理博士吗？已经有0人回复
德国亥姆霍兹Hereon中心汉堡分部招镁合金腐蚀裂变SCC课题方向2026公派博士生已经有4人回复
澳门大学应用物理及材料工程研究院潘晖教授课题组诚招博士后已经有11人回复
求助NH4V4O10晶体的CIF文件已经有0人回复
英国全奖博士招聘-深度学习与量子物理已经有0人回复
间接带隙半导体有效质量求助已经有1人回复
投稿chemical physical letters不送审？已经有2人回复

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

1楼 2012-05-21 16:15:01

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

060930115

铁虫 (初入文坛)

应助: 0 (幼儿园)
金币: 52.5
散金: 15
帖子: 20
在线: 1.8小时
虫号: 1741619
注册: 2012-04-07
性别: GG
专业: 工程热物理相关交叉领域

引用回帖:

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

好吧，看来是我的有点问题，不过还好了~谢谢你了