I used to do simple forced-fits via the command:
NonlinearRegress[data, a + x, x, a]
which would force a unit slope and solve for the constant.
Mathematica version 4 no longer supports this method for reasons I do not know. Could somebody help me with this problem? Thanks.