| 查看: 369 | 回复: 2 | ||
[求助]
求助Mathematic拟合曲线过某一点问题 已有1人参与
|
|
本人在使用Mathematica作非线性拟合，使得该拟合曲线必过{0,0}点，请问应该在何处做修改或添加？ data = {{0, 0}, {0.3, 0.029}, {1.375, 0.037}, {1.6, 0.04}, {2,0.044}, {4, 0.06031133}, {5, 0.06}, {8, 0.07}, {10, 0.08}, {16,0.09}, {25, 0.16}, {37, 0.19}, {47, 0.21}, {58, 0.29}, {70, 0.30}, {80, 0.298}}; model = 0.308*(1 - Exp[-b x]); fit = FindFit[data, model, {a, b}, x] modelf = Function[{x}, Evaluate[model /. fit]] Plot[modelf[x], {x, -5, 100}, Epilog -> Map[Point, data]] nlm = NonlinearModelFit[data, 0.308*(1 - Exp[-b x]), {a, b}, x]; nlm["RSquared"] |
回复此楼» 猜你喜欢
266求调剂
已经有7人回复
-
材料调剂
已经有16人回复
-
求调剂：085600材料与化工，考材科基，总分319
已经有22人回复
-
085600，320分求调剂
已经有4人回复
-
085701求调剂
已经有3人回复
-
考研调剂
已经有3人回复
-
0710生物学336分求调剂
已经有6人回复
-
电子信息调剂交叉学科有推荐吗
已经有7人回复
-
一志愿北京化工大学，初试成绩350求调剂
已经有3人回复
-
280求调剂
已经有20人回复
dingd
铁杆木虫 (职业作家)
- 应助: 1641 (讲师)
- 金币: 15037.3
- 散金: 101
- 红花: 234
- 帖子: 3410
- 在线: 1223.7小时
- 虫号: 291104
- 注册: 2006-10-28
2楼2015-11-13 13:51:21
3楼2015-11-13 15:34:30
