公告:1)网站程序升级:Q2A升级到1.8.6,Wordpress升级到5.7.2
2)修复了头像加载慢与提交问题反应慢等问题
2021-06-16

欢迎来到 Mathematica 问答社区

提问时请贴上文本代码

语法高亮:在编辑器中点击

被禁止的话题:广告破解

请阅读:《提问的智慧》

备用域名:mma.ooo

支持LaTex数学公式
行内公式标识符:\$ 或“$\backslash ($”+“$\backslash )$”,
行间公式标识符:\$\$ 或 “$\backslash [$”+“$\backslash ]$”

社区建议QQ群:365716997

分类

+1 投票
1.0k 浏览
eq = {u''[x] - Pi^2*Exp[u[x]] == 0};
init = {u[0] == 0, u[1] == 0};
sol = NDSolve[Join[eq, init], u, x]

 

问题来自:http://mathematica.stackexchange.com/q/134921/1871

 

 

这个问题是有解的,maple可以算。但为什么mathematica不能给出结果呢? 有什么需要注意的吗?

用户: pfg (486 分)
修改于 用户:pfg
换用 stiffnessswithing 方法试试?

2 个回答

+2 投票
 
已采纳

打靶法制定个好点的初始值就行,比如

eq = {u''[x] - Pi^2*Exp[u[x]] == 0};
init = {u[0] == 0, u[1] == 0};
sol = NDSolve[Join[eq, init], u, {x, 0, 1}, 
   Method -> {"Shooting", 
     "StartingInitialConditions" -> {u[0] == 0, u'[0] == -5}}];
Plot[Evaluate[u[t] /. sol], {t, 0, 1}]

用户: 无影东瓜 (1.2k 分)
采纳于 用户:pfg
0 投票
LZ你贴了多个地方却不附上相应的链接是会坑别人重复劳动的明白?:http://mathematica.stackexchange.com/q/134921/1871
用户: xzczd (2.2k 分)
重新显示 用户:野鹤
原来贴了链接的,后来修改时给删掉了。
抱歉,已经补上链接了
...