用mathmatic解方程，带循环为什么总不出结果，急求解谢谢啦

For[g = 0.01, g < 1.2, g = g + 0.05,
e1 = 20 -
250 x - ((8 g^2 - 30 (0.0047` - 30 x)) Tanh[
13.63969351909815` Sqrt[(0.0047` - 30 x)^2 +
16 g^2 x]])/(2 Sqrt[(0.0047` - 30 x)^2 + 16 g^2 x]);
solution = NSolve[e1 == 0, x, Reals, WorkingPrecision -> 10];
Print[g, solution]]