| 2 | 1/1 | 返回列表 |
| 查看: 565 | 回復(fù): 1 | ||
[求助]
在Matlab上模擬DLA的吸附,請(qǐng)大神幫忙修改下代碼,謝謝
|
|
% clc;clear;close all; rand('state',0); set(gcf,'DoubleBuffer','on'); N=256; % 生成狀態(tài)矩陣大小的控制參數(shù) S=ones(N); % 生成狀態(tài)矩陣S % S(N/2,N/4:N*3/4)=0; % 設(shè)置狀態(tài)矩陣的初始值 S(N/2:N*3/4,N/2)=0; % 設(shè)置狀態(tài)矩陣的初始值 Ii=imshow(S); % 顯示狀態(tài)矩陣 ti=title(['time = 0',', N=0'],'Fontsize',14,'Fontname','Times New Roman'); % 顯示時(shí)間 T=0; % 記錄時(shí)間的參數(shù) for k=1:30000; % 循環(huán)計(jì)算 xt=4; % 產(chǎn)生粒子的位置 yt=N/2; % 產(chǎn)生粒子的位置 Ss=0; % 控制下面循環(huán)是否終止的參數(shù) while Ss<1; % 計(jì)算當(dāng)前粒子的吸附過(guò)程 [dx,dy]=choose_D(0.25,0.25,0.25,0.25); % 計(jì)算粒子位移量 xt=xt+dx; % 計(jì)算下一時(shí)刻粒子的位置 yt=yt+dy; % 計(jì)算下一時(shí)刻粒子的位置 if xt<2.5|xt>N-1.5||yt<2.5|yt>N-1.5; % 判斷粒子是否逸出邊界 Ss=2; % 把Ss賦值為2,從而可以退出循環(huán) end if [S(xt+1,yt)+S(xt-1,yt)+S(xt,yt+1)+S(xt,yt-1)]<3.5; % 判斷近鄰是否有粒子 S(xt,yt)=0; % 固定當(dāng)前運(yùn)動(dòng)的粒子 Ss=2; % 把Ss賦值為2,從而可以退出循環(huán) end end set(Ii,'CData',S); % 顯示當(dāng)前狀態(tài)矩陣 T=T+1; % 累加時(shí)間參數(shù) set(ti,'String',['time = ',num2str(T),', N=',num2str(sum(sum(1-S))-[N/4+1])]); % 更新時(shí)間參數(shù) pause(0.01); % 暫停一下,顯示動(dòng)畫效果 end |
| 2 | 1/1 | 返回列表 |
| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|
|
[考研]
|
18419759900 2026-03-25 | 6/300 |
|
|---|---|---|---|---|
|
[考研] 263求調(diào)劑 +6 | yqdszhdap- 2026-03-22 | 10/500 |
|
|
[材料工程] 一志愿C9材料與化工專業(yè)總分300求調(diào)劑 +5 | 曼111 2026-03-24 | 6/300 |
|
|
[考研] 291 求調(diào)劑 +7 | 化工2026屆畢業(yè)?/a> 2026-03-21 | 8/400 |
|
|
[考研] 290分調(diào)劑求助 +3 | 吉祥止止陳 2026-03-25 | 3/150 |
|
|
[考研] 生物技術(shù)與工程 +3 | 1294608413 2026-03-25 | 4/200 |
|
|
[考研] 081700 調(diào)劑 267分 +10 | 迷人的哈哈 2026-03-23 | 10/500 |
|
|
[考研] 一志愿吉林大學(xué)材料與化工303分求調(diào)劑 +4 | 為學(xué)666 2026-03-24 | 4/200 |
|
|
[考研] 086003食品工程求調(diào)劑 +6 | 淼淼111 2026-03-24 | 6/300 |
|
|
[考研] 0856材料專碩353求調(diào)劑 +6 | NIFFFfff 2026-03-20 | 6/300 |
|
|
[考研] 344求調(diào)劑 +3 | desto 2026-03-24 | 3/150 |
|
|
[考研] 361求調(diào)劑 +3 | Glack 2026-03-22 | 3/150 |
|
|
[考研] 一志愿重慶大學(xué)085700資源與環(huán)境,總分308求調(diào)劑 +7 | 墨墨漠 2026-03-23 | 8/400 |
|
|
[考研] 求老師收我 +3 | zzh16938784 2026-03-23 | 3/150 |
|
|
[考研] 291求調(diào)劑 +5 | 孅華 2026-03-22 | 5/250 |
|
|
[考研]
|
2117205181 2026-03-21 | 8/400 |
|
|
[考研] 求調(diào)劑 +3 | 13341 2026-03-20 | 3/150 |
|
|
[考研] 求調(diào)劑 +3 | eation27 2026-03-20 | 3/150 |
|
|
[考研] 一志愿南理工085701環(huán)境302求調(diào)劑院校 +3 | 葵梓衛(wèi)隊(duì) 2026-03-20 | 3/150 |
|
|
[考研] 材料學(xué)碩318求調(diào)劑 +5 | February_Feb 2026-03-19 | 5/250 |
|