以指数形式拟合数据

Question

我是Mathematica的新手。我试图拟合（我认为）最符合指数函数的数据。我的代码：

data = {{1, 0.5}, {10, 0.25}, {20, 0.2}, {60, 0.14}, {100, 0.1}, {500,
     0.03}, {1000, 0.02}, {2000, 0.015}, {3000, 0.014}, {4000, 
    0.0125}};
line = FindFit[data, Exp[-bx], b, x]

但是我得到了

FindFit::nrlnum: The function value s not a list of real numbers with dimensions {10} at {b} = {1.}

任何想法;

Answer 1

更改

line = FindFit[data, Exp[-bx], b, x]

到

line = FindFit[data, Exp[-b*x], b, x]