24小时热门版块排行榜    

查看: 315  |  回复: 2

yujnu888

铜虫 (小有名气)

[求助] 求助如何给参数设定范围已有1人参与

本人在使用Mathematica作非线性拟合,有三个参数(a,b,c),其中一个参数c设定范围为0《c《1,
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}};
model = 0.3*(c*(1 - 0.56 Exp[-0.006 b x]) + (1 - c)*(1 - Exp[-a x]));
fit = FindFit[data, model, {a, b, c}, x]
modelf = Function[{x}, Evaluate[model /. fit]]
Plot[modelf[x], {x, 0, 100}, Epilog -> Map[Point, data]]
nlm = NonlinearModelFit[data, 0.3*(c*(1 - 0.56 Exp[-0.006 b x]) + (1 - c)*(1 - Exp[-a x])), {a, b, c}, x];
nlm["RSquared"]

求助应该在哪里如何添加?
回复此楼
已阅   关注TA 给TA发消息 送TA红花 TA的回帖

xzczd

木虫 (小有名气)

【答案】应助回帖

★ ★ ★ ★ ★ ★ ★ ★ ★ ★
感谢参与,应助指数 +1
yujnu888: 金币+10, ★★★★★最佳答案, 完美解决! 2015-10-03 10:22:44

yujnu888

铜虫 (小有名气)

相关版块跳转 我要订阅楼主 yujnu888 的主题更新
信息提示
请填处理意见