What exactly do you mean by InverseFunction[...] ?
In my opinion:
If y = f [ x ] then (if it exists) x = InverseFunction [ f ] [ y ]
So I think you f [ x ] is
f[ x_ ]:= 2 (-10 Log[200 + 2 E^(x/10) C[1] + 20 x + x^2] + x)
This shows the graph of f for different C[1], C[2]
Manipulate[
Plot[
f[t + C[2]] /. C[1] -> c1,
{t, 0, 10},
PlotRange -> {-120, -100}
],
{{c1, 0}, -100, 100}, {{C[2], 0}, -100, 100}
]
Unfortunately it seems to be impossible to solve y = f [ x ] for x
In[41]:= Solve[y == f[x], x]
During evaluation of In[41]:= Solve::tdep: The equations appear to involve the variables to be solved for in an essentially non-algebraic way. >>
Out[41]= Solve[
y == 2 (x - 10 Log[200 + 20 x + x^2 + 2 E^(x/10) C[1]]), x]
But you can plot the InverseFunction of f [ t ] by
ParametricPlot [ { f [ t ], t }, {t, t0, t1 } ]
For example like this ( I added your "equations" as red points ). Seems a solution is somewhat difficult
Manipulate[
ParametricPlot[
{2 (-10 Log[200 + 2 E^(#1/10) C[1] + 20 #1 + #1^2] + #1) &[ t + C[2]], t },
{t, 0, 10},
PlotRange -> {{-100, 100}, {-20, 60}},
AspectRatio -> 1,
Epilog -> {Red, PointSize[.02], Point /@ {{1, 0}, {50, 50}}}
],
{{C[1], 0}, -100, 100}, {{C[2], 0}, -100, 100}
]