随机生成多孔介质matlab程序

《随机生成多孔介质matlab程序》由会员上传分享，免费在线阅读，更多相关内容在应用文档-天天文库。

1、%ÀîÈÊÃñclc;clearall;closeallmax_j=193;max_i=81;d11=0.005;d13=0.005;d14=0.001;d12=0.001;d15=0.0001;d16=0.0001;d17=0.0001;d18=0.0001;n=0.7;%¿×϶¶Ècdd=0.001;%Pcd¹ÌÏàÉú³¤ºË¸ÅÂÊnumtotal_need=(1-n)*max_i*max_j;numsoild=0;arrgrid=zeros(max_i,max_j);whilenumsoild

2、need/40fori=1:max_iforj=1:max_jifabs(rand())

3、ld

4、msoild,1)=i;soild(numsoild,2)=j;endend%¹ÌÏàÄÚºËÏòÓÒÉú³¤2·½Ïòifindex_i2+1i=index_i;j=index

5、_j-1;ifarrgrid(i,j)==0&&rand()2+1i=index_i-1;j=index_j;ifarrgrid(i,j)==0&&rand()

6、soild,2)=j;endend%¹ÌÏàÄÚºËÏòÓÒÉú³¤5·½Ïòifindex_j2+1i=inde

7、x_i+1;j=index_j-1;%ÓÒ1ifarrgrid(i,j)==0&&rand()2+1&&index_i>2+1i=index_i-1;j=index_j-1;%ÓÒ1ifarrgrid(i,j)==0&&rand()

8、i,j)=1;soild(numsoild,1)=i;soild(numsoild,2)=j;endend%¹ÌÏàÄÚºËÏòÓÒÉú³¤8·½Ïòifindex_j2+1i=index_i-1;j=index_j+1;%ÓÒ1ifarrgrid(i,