如何在Mathematica中更改x和y轴的范围间隔

Question

以下是我使用Mathematica绘制图表的数据。

f[x_] := {x, Sqrt[2/(3 x)]};

ListLinePlot[f /@ {2, 10, 100, 10^4, 10^7}]

但是如果我将x轴范围增加到10 ^ 7以上，则它变成直线并且几乎与x轴成为水平，因此无法区分。所以我试图增加x轴的范围，现在我有5000-10000的范围，我会把它减少到1000的区间，即5000-6000和6000-7000等等。

类似的HOw我也可以改变y轴的范围。

下面是我上面的图表

提前致谢。