How to transform ListPlot ticks

I am sure that this is a standard question, but I have not been able to find it, either by a google search or by searching here on the Mathematica StackExchange.

If I have a list plot defined by:

GraphicsGrid[{{ListPlot[AmplitudeData, Joined -> True, PlotRange -> All],
ListPlot[RealData, Joined -> True, PlotRange -> All]}}]

Which gives the following output:

And I wish to transform the axes so that the peak is at 00, i.e. so the axis values are transformed by −250-250. How can I do this?



1 Answer


I believe you want DataRange:

dat = Table[PDF[BinomialDistribution[50, 0.5], k], {k, 0, 50}];


ListPlot[dat, DataRange -> {-25, 25}]



Yes, thank you – That does exactly what I wanted it to!
– Shaktal
May 14 ’15 at 12:01