24小时热门版块排行榜    

Znn3bq.jpeg
查看: 1555  |  回复: 6
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

亮亮1283

新虫 (小有名气)

[求助] matlab程序问题,总是出错,麻烦大家看看问题在那里?

function pdex1()

clc
clear
Up =400;
Un =8000;
Kb =1.38*10^(-23);
h =6.63*10^(-34);  
e =1.6*10^(-19);   
r =0.35;
y =0.6;  
n0 =1*10^16;
p0 =1*10^16;
tn =1*10^(-9);
tp =1*10^(-9);  
p1 =p0;
n1 =n0;
T =300;
a =1.65*10^4;
v =(3/532)*10^17;
X =10;
P=10;  
%主函数----------------------------------------------------------------
m=0;
x=0:0.1:10;
t=0:20:1000;
sol = pdepe(m,@pdex1pde,@pdex1ic,@pdex1bc,x,t);
figure('numbertitle','off','name','PDE Demo-by matlab')
subplot(211)
surf(x,t,sol(:,:,1))
title('The Solution of p')
xlable('x')
ylable('t')
zlable('p')
subplot(212)
surf(x,t,sol(:,:,2))
title('The Solution of n')
xlable('x')
ylable('t')
zlable('n')


%目标函数----------------------------------------------------------------
function [c,f,s] = pdex1pde(x,t,u,DuDx)
c= [1;1];
f= [(Up*Kb*T/e)*DuDx(1); (Un*Kb*T/e)*DuDx(2)];
G= a*y*(1-r)*P*exp(-a*x)/(h*v);
R1= u(1)*u(2)-p0*n0;
R2=tn*(u(1)+p1)+tp*(u(2)+n1);
R=R1/R2;
s= [1;1].*(G-R);


%初值条件函数------------------------------------------------------------
function u0 = pdex1ic(x)
u0= [p0;n0];

%边界条件函数------------------------------------------------------------
function [pa,qa,pb,qb] = pdex1bc(xa,ua,xb,ub,t)       %a为下边界, b为上边界
pa =[0; 0];
qa =[1; 1];
pb =[0; 0];
qb =[1; 1];
回复此楼

» 猜你喜欢

» 本主题相关价值贴推荐,对您同样有帮助:

已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

csgt0

荣誉版主 (著名写手)

彩色挂图

【答案】应助回帖

★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★
感谢参与,应助指数 +1
亮亮1283: 金币+20, ★★★★★最佳答案, 哈哈,就是这个原因。太谢谢你了! 2012-05-28 15:17:02
不知道对不对,画出来的结果好像都是1*10^16
原程序主要有两个问题,你的那些参数需要用全局变量,子函数不能直接用主函数的值的
还有xlabel,ylabel,zlabel,不是xlable等



function pdex1()

clc
clear
global Up Kb T P a y r h v Un e tp p0 n0 n1 p1 G tn
Up =400;
Un =8000;
Kb =1.38*10^(-23);
h =6.63*10^(-34);  
e =1.6*10^(-19);   
r =0.35;
y =0.6;  
n0 =1*10^16;
p0 =1*10^16;
tn =1*10^(-9);
tp =1*10^(-9);  
p1 =p0;
n1 =n0;
T =300;
a =1.65*10^4;
v =(3/532)*10^17;
X =10;
P=10;  

%主函数----------------------------------------------------------------
m=0;
x=0:0.1:10;
t=0:20:1000;
sol = pdepe(m,@pdex1pde,@pdex1ic,@pdex1bc,x,t);
% u =[ sol(:,:,1), sol(:,:,2)];
figure('numbertitle','off','name','PDE Demo-by matlab')
subplot(211)
surf(x,t,sol(:,:,1))
title('The Solution of p')
xlabel('x')
ylabel('t')
zlabel('p')
subplot(212)
surf(x,t,sol(:,:,2))
title('The Solution of n')
xlabel('x')
ylabel('t')
zlabel('n')


%目标函数----------------------------------------------------------------
function [c,f,s] = pdex1pde(x,t,u,DuDx)
     global Up Kb T P a y r h v Un e tp p0 n0 n1 p1 G tn
c= [1;1];
f= [(Up*Kb*T/e)*DuDx(1); (Un*Kb*T/e)*DuDx(2)];
G= a*y*(1-r)*P*exp(-a*x)/(h*v);
R1= u(1)*u(2)-p0*n0;
R2=tn*(u(1)+p1)+tp*(u(2)+n1);
R=R1/R2;
s= [1;1].*(G-R);


%初值条件函数------------------------------------------------------------
function u0 = pdex1ic(x)
global p0 n0
u0= [p0;n0];

%边界条件函数------------------------------------------------------------
function [pa,qa,pb,qb] = pdex1bc(xa,ua,xb,ub,t)       %a为下边界, b为上边界
pa =[0; 0];
qa =[1; 1];
pb =[0; 0];
qb =[1; 1];

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

showmethemoney
4楼2012-05-28 14:35:31
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 7 个回答

czxf

银虫 (正式写手)

【答案】应助回帖

感谢参与,应助指数 +1
楼主,你的函数文件能正常调用吗?有些格式都是错的。注意FUNCTION申明的是函数文件,而不是c中的函数
2楼2012-05-26 21:43:32
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

亮亮1283

新虫 (小有名气)

引用回帖:
2楼: Originally posted by czxf at 2012-05-26 21:43:32
楼主,你的函数文件能正常调用吗?有些格式都是错的。注意FUNCTION申明的是函数文件,而不是c中的函数

实在是不好意思啊,我不是很懂你说的什么意思,这个程序是我参考matlab帮助里面一个专门求解这样的方程组的例子写的。能不能麻烦你把错误的地方给我指一下,我好再看看。
3楼2012-05-27 12:52:04
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

亮亮1283

新虫 (小有名气)

引用回帖:
4楼: Originally posted by csgt0 at 2012-05-28 14:35:31
不知道对不对,画出来的结果好像都是1*10^16
原程序主要有两个问题,你的那些参数需要用全局变量,子函数不能直接用主函数的值的
还有xlabel,ylabel,zlabel,不是xlable等



function pdex1()

clc
c ...

问题解决了
5楼2012-05-28 15:20:24
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 一志愿安大生物学07初试322、本科二本、调剂求助 +10 李多米lee. 2026-04-12 11/550 2026-04-12 22:58 by yuyin1233
[考研] 297工科,求调剂? +10 河南农业大学-能 2026-04-12 10/500 2026-04-12 22:44 by lbsjt
[考研] 308求调剂 +5 VvvvL 2026-04-10 5/250 2026-04-12 10:17 by babysonlkd
[考研] 求调剂,一志愿材料科学与工程985,365分, +8 材化李可 2026-04-11 10/500 2026-04-12 08:42 by 852137818
[考研] 331求调剂 +5 王国帅 2026-04-11 5/250 2026-04-11 22:56 by 溪涧流水
[考研] 一志愿厦大0856,306求调剂 +15 Bblinging 2026-04-11 15/750 2026-04-11 22:53 by 314126402
[考研] 293求调剂 +6 勇远库爱314 2026-04-08 6/300 2026-04-11 10:08 by zhq0425
[考研] 一志愿东北大学控制工程085406数二英二385,求调剂 +8 Ezra_Zhang 2026-04-09 8/400 2026-04-11 09:15 by 猪会飞
[考研] 284求调剂 +12 archer.. 2026-04-10 13/650 2026-04-11 08:44 by zhq0425
[考研] 085506-求调剂-285分 +3 雷欧飞踢 2026-04-08 3/150 2026-04-11 08:37 by zhq0425
[考研] 一志愿211,化学310分,本科重点双非,求调剂 +23 努力奋斗112 2026-04-08 23/1150 2026-04-10 23:29 by 314126402
[材料工程] 材料调剂推荐 +8 蛋糕x2 2026-04-07 8/400 2026-04-10 23:13 by Ftglcn90
[考研] 一志愿京区985,085401,与本科专业一致,电子信息工程, +4 阳光开朗的男孩 2026-04-10 4/200 2026-04-10 18:27 by shenrf
[考研] 273求调剂 +51 麦小叮当 2026-04-06 58/2900 2026-04-10 15:54 by jiajinhpu
[考研] 材料工程调剂 +12 小刘同学吖吖 2026-04-06 13/650 2026-04-09 17:07 by luoyongfeng
[考研] 机械专硕273请求调剂 +6 庚申壬申 2026-04-07 6/300 2026-04-08 22:41 by bljnqdcc
[考研] 338求调剂 +5 小猪红色 678 2026-04-06 6/300 2026-04-07 21:18 by 乔哒哒哒
[考研] 318求调剂 +5 李青山山山 2026-04-07 5/250 2026-04-07 18:24 by 蓝云思雨
[考研] 085100建筑学 寻求跨专业调剂 一志愿南大294分 校级省级国家级奖项若干 踏实肯干 +3 1021075758 2026-04-06 4/200 2026-04-07 09:23 by 蓝云思雨
[考研] 312求调剂 +4 LR6 2026-04-06 4/200 2026-04-07 08:42 by jp9609
信息提示
请填处理意见