This is my time function:
`time[x_] := Evaluate[Fit[data, {1, x, x^2}, x ]]`
How can I combine the Solve[] function with the time[] function I created to determine what size grid could handle 4.3 * 10 ^17 seconds?
Age of the observable universe, huh? I'm giving that a little thought! You do realize, don't you, that Mathematica will have a few upgrades by then.