| 查看: 1199 | 回复: 11 | ||
| 当前只显示满足指定条件的回帖，点击这里查看本话题的所有回帖 | ||
[求助]
哪位大仙帮我看下程序，我用的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') |
回复此楼» 猜你喜欢
有没有接收比较快的sci期刊呀，最好在一个月之内的，研三孩子求毕业
已经有4人回复
-
294求调剂
已经有3人回复
-
恳请有学校收留
已经有8人回复
-
一志愿华中农业071010，320求调剂
已经有17人回复
-
收到复试调剂但是去不了
已经有5人回复
-
297，工科调剂?
已经有4人回复
-
291求调剂
已经有9人回复
-
300求调剂
已经有11人回复
-
22专硕求调剂
已经有12人回复
-
材料相关专业344求调剂双非工科学校或课题组
已经有25人回复
Kuiyanlong
铁虫 (初入文坛)
- 应助: 4 (幼儿园)
- 金币: 1135.5
- 帖子: 25
- 在线: 27.1小时
- 虫号: 2166508
- 注册: 2012-12-04
- 性别: GG
- 专业: 机械动力学
3楼2012-12-05 00:52:47
Kuiyanlong
铁虫 (初入文坛)
- 应助: 4 (幼儿园)
- 金币: 1135.5
- 帖子: 25
- 在线: 27.1小时
- 虫号: 2166508
- 注册: 2012-12-04
- 性别: GG
- 专业: 机械动力学
【答案】应助回帖
★ ★
感谢参与，应助指数 +1
xiegangmai: 金币+2, 谢谢参与 2012-12-05 19:55:09
感谢参与，应助指数 +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 |
2楼2012-12-05 00:47:40
4楼2012-12-05 16:47:55
5楼2012-12-05 16:58:32
20