| 查看: 880 | 回复: 2 | ||
[求助]
用mathmatica画图，不知道怎么不收敛呢，请求指导
|
|
用mathmatica画图，不知道怎么不收敛呢，请指导，谢谢，感激不尽 U1 = -((0.0015*0.0015*10^(-18))/r^6) + 1.1552*10^(-19) (0.010 + 0.010)*Exp[(0.10 + 0.10 - r)/(0.010 + 0.010)] Plot[U1, {r, 1, 4}] FindRoot[ӘrU1== 0, {r, 3}] |
回复此楼» 猜你喜欢
博士自荐
已经有6人回复
-
博士推荐
已经有4人回复
-
求环氧树脂研发1名
已经有10人回复
-
280求调剂
已经有5人回复
-
什么是人一生最重要的？
已经有10人回复
-
面上可以超过30页吧？
已经有13人回复
-
为什么中国大学工科教授们水了那么多所谓的顶会顶刊，但还是做不出宇树机器人？
已经有13人回复
-
版面费该交吗
已经有17人回复
-
【博士招生】太原理工大学2026化工博士
已经有8人回复
kabaisun
专家顾问 (正式写手)
- 应助: 20 (小学生)
- 金币: 1311.9
- 散金: 681
- 红花: 3
- 帖子: 315
- 在线: 113.8小时
- 虫号: 1990141
- 注册: 2012-09-10
- 性别: GG
- 专业: 交通运输经济学
- 管辖: 计算模拟区
2楼2014-09-25 08:27:39
3楼2014-09-27 15:34:29