# 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?

• Just remove // N?
– kglr
May 31 at 11:30
• @kglr That’s great. But it not as standard notation as 0,Pi/4,Pi/2,3pi/4 , Pi! May 31 at 11:48
• does Ticks -> {Transpose[{Rescale[#, {0, Pi}, {0, 3000}], #} &@ FindDivisions[{0, Pi, Pi/16}, 8, Method -> {}]], Automatic} give what you need?
– kglr
May 31 at 11:57
• @kglr It’s working. But I am not sure where did you incorporate 1/902*Pi/4. May 31 at 12:06
• if you want the horizontal range to go from 0 to 3000 Pi /902/4 (as x goes from 0 to 3000) try Ticks -> {Transpose[{Rescale[#, {0, 3000 Pi/902/4}, {0, 3000}], #} &@ FindDivisions[{0, 3000 Pi/902/4, Pi/16}, 8, Method -> {}]], Automatic}
– kglr
May 31 at 12:29

xticks = Transpose[{4 # 902 / Pi, #}] &@