# ListPlot and AspectRatio

Here is a simple scenario

data = {{-0.5, 0.2}, {0.7, 0.1}, {1.4, -0.1}};
L0 = ListPlot[data, PlotStyle -> {Black, PointSize[Large]},
Frame -> True, AspectRatio -> 1, PlotRange -> {{-1.5, 2}, {-1, 1}}]


which gives

My question is very simple: for the given plot range (it should not be changed) how can I get the two axes divisions (blue and red) equal in size?

data = {{-0.5, 0.2}, {0.7, 0.1}, {1.4, -0.1}};
pr = {{-1.5, 4}, {-1, 1}};
L0 = ListPlot[data, PlotStyle -> {Black, PointSize[Large]},
Frame -> True,
AspectRatio -> First[1/Divide @@ (Differences /@ pr)],
PlotRange -> pr]


• OK, but what if I also want a square frame? – Vaggelis_Z Feb 21 '15 at 16:19
• Yes, I want the blue and red distances shown in the plot to be equal. – Vaggelis_Z Feb 21 '15 at 16:30
• I want a square plot like that posted in which the distance between the tickmarks of the x-axis (blue line) to be equal in length with the distance between the tickmarks of the y-axis (red line). – Vaggelis_Z Feb 21 '15 at 16:44
• The ranges should be fixed as PlotRange -> {{-1.5, 2}, {-1, 1}} – Vaggelis_Z Feb 21 '15 at 16:51
• @Vaggelis_Z No, what I meant is that the blue and red segments will be of equal length in the image, but they will represent different variable ranges. – Dr. belisarius Feb 21 '15 at 16:53