Mathematica 9 is now available
Student Support Forum
-----
Student Support Forum: 'FindFit' topicStudent Support Forum > General > "FindFit"

Help | Reply To Topic
Author Comment/Response
ray
09/21/10 8:36pm

FindFit didn't work, don't know what to do to make/help it work???


ClearAll["`*"]
data = {
{1990, 353},
{2000, 375},
{2075, 590},
{2175, 1090},
{2275, 2000}
}; .001 < k < .01;
p1 = ListPlot[data];
FindFit[data, {353 E^(k *(x - 1990))}, k, x]
FindFit[data, {353 Exp[k (x - 1990)]}, {k, .006}, x]
p2 = Plot[353 E^(k (x - 1990)) /. k -> 0.0060857, {x, 1990, 2300}];
d1[x_] = 353 E^(k (x - 1990)) /. k -> 0.0060857`;
d1[2175]
Show[p1, p2]

URL: ,
Help | Reply To Topic