24小时热门版块排行榜    

CyRhmU.jpeg
查看: 166  |  回复: 1
当前主题已经存档。

hongyexi

木虫 (正式写手)

[交流] [求助]Mathematica做拟合出错

下面为用Mathematica做的拟合并作图,附件为程序、输出、以及错误信息,高手帮忙看一下
data = {{0.258, 2.056}, {0.258, 2.122}, {0.282, 2.002}, {0.282, 2.07}, {0.282,
     2.105}, {0.305, 1.983}, {0.305, 2.023},{0.329, 1.929}, {0.352, 1.843}, {0.376, 1.781}, {0.399, 1.737}, {0.423, 1.702}, {0.446, 1.676}, {0.493, 1.59}};
FindFit[data, a + (b - a)/(1 + (x/c)^d), {a, b, c, d}, x]

pd = ListPlot[data, DisplayFunction -> Identity];
fd = Plot[ a + (b - a)/(1 + (x/c)^d) /. %2, {x, 0.2, 0.5}, DisplayFunction ->
        Identity];
Show[pd, fd, DisplayFunction -> $DisplayFunction]

[ Last edited by hongyexi on 2008-3-15 at 20:44 ]
回复此楼
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

forumts

木虫之王 (文坛精英)

文献杰出贡献

★ ★
hongyexi(金币+2,VIP+0):谢谢,有问题再请教
不知道解决了没有,可能是有变量没给值,将pd保存一下,然后打开看看
2楼2008-04-01 17:40:34
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 hongyexi 的主题更新
普通表情 高级回复(可上传附件)
信息提示
请填处理意见