24小时热门版块排行榜    

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

yangfan832

铜虫 (初入文坛)

[求助] matlab下bvp4c求解非线方程问题

请问各位大侠,我自己编了个用bvp4c求解器求解非线性边值条件方程组的程序。当方程中系数n=1时,即系数简化的情况下,程序能较好的运行并算出较好的数值结果。当n不等于1,程序提示出现奇异性,不能求解方程。请问这是给定初值不合适的原因吗还是有别的问题,能帮忙解决一下吗?谢谢!
global b t E EI eta H l r Es EIz Q EIA m n ha;
b=100/10^9;l=1000/10^9;t=50/10^9;r=0.89;
E=76*10^9;Es=1.22;
EI=E*b*t^3/12; H=2*(t+b)*r;
EIz=EI+0.5*Es*b*t^2+Es*t^3/6;
EIA=E*b*t+2*Es*(b+t);
m=H*l^2/EIz;
%n=EIA*l^2/EIz;
n=1;
ha=H/EIA;
eta=t/l;
Q=-1;                            %以上是给定常数参数
myinit=[0 1 0 1 0.001 -0.1];%[0 1 0  0  7 -5],[0 1 0 1 0.1 -0.1]
solint=bvpinit([0 0.25 0.5 0.75 1],myinit);
sol=bvp4c(@ss01,@ss02,solint);


function odefun1=ss01(x,y);  %给出控制方程
global eta m n;
odefun1=[y(2);-eta^2*y(4)*y(5);y(4);y(5);y(6);-m*y(5)-n*(y(2)+0.5*eta^2*y(4)^2)*y(5)];
return

function bcfun1=ss02(ya,yb);%给出边界条件
global Q n eta ha;
bcfun1=[ya(1);ya(4);ya(3);yb(5);yb(2)+0.5*eta^2*yb(4)^2+ha;eta*(yb(2)+0.5*eta^2*yb(4)^2)*yb(4)+eta*yb(6)/n+ha*eta*yb(4)-Q];
return
回复此楼

» 猜你喜欢

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

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

yangfan832

铜虫 (初入文坛)

谢谢提醒,我的问题是求解一个方程组如下
u''+eta^2(v')*v''=0
v''''+m*v''+n(u'+0.5*eta^2*(v')^2)*v''=0
3楼2012-01-18 11:00:31
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 6 个回答

dingd

铁杆木虫 (职业作家)

【答案】应助回帖


感谢参与,应助指数 +1
yangfan832(金币+1): 2012-01-18 11:02:13
jjdg(金币+1): 感谢应助 2012-01-18 11:57:49
可能的话把模型用通俗文字或图片描述下。
2楼2012-01-17 23:14:07
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

dingd

铁杆木虫 (职业作家)

【答案】应助回帖


jjdg(金币+1): 感谢参与 2012-01-19 09:36:08
常数、边界条件等都用通俗文字给出吧。
6楼2012-01-18 13:52:28
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
信息提示
请填处理意见