| 查看: 1189 | 回復(fù): 11 | ||
chugezhuang鐵蟲 (初入文壇)
|
[求助]
哪位大仙幫我看下程序,我用的matlab7.1,運行提示du未定義
|
|
function [c,f,s]=pdefun(x,t,u,du) c=[1;1]; f=[0.024*du(1);0.17*du(2)]; temp=u(1)-u(2); s=[-1;1].*(exp(5.73*temp)-exp(-11.46*temp)); function [pa,qa,pb,qb]=pdebc(xa,ua,xb,ub,t) pa=[0;ua(2)]; qa=[1;0]; pb=[ub(1)-1;0]; qb=[0;1]; function u0=pdeic(x) u0=[1;0]; clc x=0:0.05:1; t=0:0.05:2; m=0; sol=pdepe(m,@pdefun,@pdeic,@pdebc,x,t); figure('numbertitle','off','name','PDE Demo——by Matlabsky') subplot(211) surf(x,t,sol(:,:,1)) title('The Solution of u_1') xlabel('X') ylabel('T') zlabel('U') subplot(212) surf(x,t,sol(:,:,2)) title('The Solution of u_2') xlabel('X') ylabel('T') zlabel('U') |

鐵蟲 (初入文壇)
|
換一下表達就可以了,將 sol函數(shù)提前 function ABC x=0:0.05:1; t=0:0.05:2; m=0; sol=pdepe(m,@pdefun,@pdeic,@pdebc,x,t); figure('numbertitle','off','name','PDE Demo——by Matlabsky') subplot(211) surf(x,t,sol(:,:,1)) title('The Solution of u_1') xlabel('X') ylabel('T') zlabel('U') subplot(212) surf(x,t,sol(:,:,2)) title('The Solution of u_2') xlabel('X') ylabel('T') zlabel('U') function [c,f,s]=pdefun(x,t,u,du) c=[1;1]; f=[0.024*du(1);0.17*du(2)]; temp=u(1)-u(2); s=[-1;1].*(exp(5.73*temp)-exp(-11.46*temp)); function [pa,qa,pb,qb]=pdebc(xa,ua,xb,ub,t) pa=[0;ua(2)]; qa=[1;0]; pb=[ub(1)-1;0]; qb=[0;1]; function u0=pdeic(x) u0=[1;0]; clc |

鐵蟲 (初入文壇)

鐵蟲 (初入文壇)

鐵蟲 (初入文壇)

鐵蟲 (初入文壇)

鐵蟲 (初入文壇)

鐵蟲 (初入文壇)
|
我試了一下,while循環(huán)結(jié)果不是很理想,用for循環(huán)驗算,發(fā)現(xiàn)u的結(jié)果太小 ep=1e-6; p0=0.25; t=0.02; Cv=0.04; Tv=Cv*t; L=0.5; z=3; n=0; c0=2.*L.*p0./pi; u=0; for n=0:100 m=2.*n+1 u=u+1/m*sin(m/(2*L))*pi*z*eps(-Tv*m^2*pi*pi/4) end |

鐵蟲 (初入文壇)
|
eps=1e-6; p0=0.25; t=0.02; Cv=0.04; Tv=Cv*t; L=0.5; z=3; n=1; c0=2.*L.*p0./pi; u=0; u=inline('1/m*sin(m/(2*L))*pi*z*eps(-Tv*m^2*pi*pi/4)','m','L','Tv','z'); u=u(n,L,Tv,z); eu=0; while eu>=eps m=2*n+1 eu=u(m,L,Tv,z) u=u+eu; eu=co*eu; end u=c0*u-p0 還是上面說的問題,那個求和的部分太小 |

鐵蟲 (初入文壇)
|
eps=1e-6; p0=0.25; t=0.02; Cv=0.04; Tv=Cv*t; L=0.5; z=3; n=1; c0=2.*L.*p0./pi; c=inline('1/m*sin(m/(2*L))*pi*z*eps(-Tv*m^2*pi*pi/4)','m','L','Tv','z'); u=c(n,L,Tv,z); eu=1; while abs(eu)>=eps m=2*n+1; eu=c(m,L,Tv,z); u=u+eu; n=n+1; eu=c0*eu; end u=c0*u-p0; |

| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|
|
[考研] 一志愿武理材料工程302調(diào)劑環(huán)化或化工 +6 | Doleres 2026-03-31 | 6/300 |
|
|---|---|---|---|---|
|
[考研] 080500-315分復(fù)試調(diào)劑 +9 | 上岸3821 2026-03-31 | 9/450 |
|
|
[考研] 286求調(diào)劑 +5 | 丟掉懶惰 2026-03-27 | 8/400 |
|
|
[考研] 一志愿食品科學與工程083200求調(diào)劑 +4 | XQTJZ 2026-03-30 | 4/200 |
|
|
[考研] 合肥區(qū)域性重點一本招收調(diào)劑 +4 | 6266jl 2026-03-30 | 4/200 |
|
|
[考研] 279求調(diào)劑 +12 | j的立方 2026-03-29 | 12/600 |
|
|
[考研] 求調(diào)劑 +10 | 家佳佳佳佳佳 2026-03-29 | 10/500 |
|
|
[考研] 328求調(diào)劑 +8 | 嗯滴的基本都 2026-03-27 | 8/400 |
|
|
[考研] 342求調(diào)劑 +4 | 加油a李zs 2026-03-26 | 4/200 |
|
|
[考研] 329求調(diào)劑 +8 | 星野? 2026-03-26 | 8/400 |
|
|
[考研] 318一志愿吉林大學生物與醫(yī)藥 求調(diào)劑 +5 | 篤行致遠. 2026-03-28 | 5/250 |
|
|
[考研] 305求調(diào)劑 +8 | RuiFairyrui 2026-03-28 | 8/400 |
|
|
[考研] 081200-11408-276學碩求調(diào)劑 +6 | 崔wj 2026-03-26 | 6/300 |
|
|
[考研] 0856,材料與化工321分求調(diào)劑 +12 | 大饞小子 2026-03-27 | 13/650 |
|
|
[考研] 275求調(diào)劑 +10 | jjjjjjjjjjl 2026-03-27 | 10/500 |
|
|
[考研] 266分求材料化工冶金礦業(yè)等專業(yè)的調(diào)劑 +4 | 哇呼哼呼哼 2026-03-26 | 4/200 |
|
|
[碩博家園] 北京林業(yè)大學碩導(dǎo)招生廣告 +6 | kongweilin 2026-03-26 | 8/400 |
|
|
[考研] 機械學碩310分,數(shù)一英一,一志愿211本科雙非找調(diào)劑信息 +3 | @357 2026-03-25 | 3/150 |
|
|
[考研] 打過很多競賽,085406控制工程300分,求調(diào)劑 +3 | askeladz 2026-03-26 | 3/150 |
|
|
[考研] 【2026考研調(diào)劑】制藥工程 284分 求相關(guān)專業(yè)調(diào)劑名額 +4 | 袁奐奐 2026-03-25 | 8/400 |
|