X axis rescaling without altering the y axis

I have asked this question previously and I didn’t get a satisfactory answer. Then I posted a comment and didn’t receive any replies. So I thought to elaborate my issue.
I have:

Plot[{Sin[t]^2}, {t, 0, 3000}, Background -> White]

Then I get

Plot[{Sin[t]^2}, {t, 0, 3000}, Background -> White, Ticks -> {{#,
1/902*Pi/4 #} & /@ FindDivisions[{0., 3000}, 6] //
N, Automatic}]

Then I get:

When you compare two figures, I rescaled the x axis in second figure without altering y axis with new ticks. But actually when you look you can see that second plot can be written in terms of Pi multiples. But I don’t know how. Any way?

xticks = Transpose[{4 # 902 / Pi, #}] &@
  FindDivisions[{0, 3000 Pi/902/4, Pi/16}, 8, Method -> {}]

Plot[Sin[t]^2, {t, 0, 3000}, Ticks -> {xtikcs, Automatic}]