24小时热门版块排行榜    

CyRhmU.jpeg
查看: 1079  |  回复: 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')
回复此楼
Life isn't about waiting for the storm to pass, it's about learning to dance in the rain.
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

Kuiyanlong

铁虫 (初入文坛)

【答案】应助回帖

★ ★
感谢参与,应助指数 +1
xiegangmai: 金币+2, 谢谢参与 2012-12-05 19:55:09
换一下表达就可以了,将 sol函数提前
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
Bebornthisway
2楼2012-12-05 00:47:40
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

Kuiyanlong

铁虫 (初入文坛)

【答案】应助回帖

太可惜了运行出来的图片放不进去
Bebornthisway
3楼2012-12-05 00:52:47
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

chugezhuang

铁虫 (初入文坛)

引用回帖:
3楼: Originally posted by Kuiyanlong at 2012-12-05 00:52:47
太可惜了运行出来的图片放不进去

已经解决了,不过还是非常感谢
Life isn't about waiting for the storm to pass, it's about learning to dance in the rain.
4楼2012-12-05 16:47:55
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

chugezhuang

铁虫 (初入文坛)

引用回帖:
2楼: Originally posted by Kuiyanlong at 2012-12-05 00:47:40
换一下表达就可以了,将 sol函数提前
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 ...

你好,再麻烦你下,能不能帮我把这个解的程序编出来,我想要解的图,可我不太会弄。L,Tv,p0都是常数

TC[OK9ZXP3BTFH{S825$[49.jpg

Life isn't about waiting for the storm to pass, it's about learning to dance in the rain.
5楼2012-12-05 16:58:32
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

Kuiyanlong

铁虫 (初入文坛)

【答案】应助回帖

t在哪里????

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

Bebornthisway
6楼2012-12-05 21:06:53
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

chugezhuang

铁虫 (初入文坛)

送鲜花一朵
引用回帖:
6楼: Originally posted by Kuiyanlong at 2012-12-05 21:06:53
t在哪里????

Tv=Cv*t,Cv是常数。非常感谢。我看的头大了这几天,呵呵
Life isn't about waiting for the storm to pass, it's about learning to dance in the rain.
7楼2012-12-06 10:38:46
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

Kuiyanlong

铁虫 (初入文坛)

【答案】应助回帖


xiegangmai: 金币+1, 谢谢参与 2012-12-06 19:45:17
我试了一下,while循环结果不是很理想,用for循环验算,发现u的结果太小
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

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

Bebornthisway
8楼2012-12-06 18:50:32
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

Kuiyanlong

铁虫 (初入文坛)

【答案】应助回帖


xiegangmai: 金币+1, 谢谢参与 2012-12-06 19:45:07
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

还是上面说的问题,那个求和的部分太小
Bebornthisway
9楼2012-12-06 19:12:05
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

Kuiyanlong

铁虫 (初入文坛)

【答案】应助回帖


xiegangmai: 金币+1, 谢谢参与 2012-12-06 19:45:00
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;
Bebornthisway
10楼2012-12-06 19:27:34
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 chugezhuang 的主题更新
信息提示
请填处理意见