| 查看: 399 | 回复: 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"] |
» 猜你喜欢
据悉今年马上要出结果了
已经有6人回复
应该是93bebmhtak前后十一个字符比较关键
已经有17人回复
2026国自然放榜时间
已经有7人回复
综述论文作为代表作会不会影响评审专家的印象分?
已经有7人回复
面上项目filecode邪修
已经有7人回复
关于代码变化问题,想知道的进来
已经有22人回复
这样的filecode谁见过
已经有21人回复
filecode与中标关系的预测
已经有5人回复
fileCode有新解读?
已经有18人回复
关于filecode,很负责任的告诉大家
已经有7人回复
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










回复此楼
20