如何在Mathematica中使两个轴上的单位间隔在视觉上具有相同的长度

时间:2011-06-09 18:48:08

标签: wolfram-mathematica

我想制作一个图,其中两个轴上的单位间隔在视觉上具有相同的长度。即我希望(1,1)和(0,0)制作一个正方形而不是一个细长的矩形。

我无法找到使下列简单案例成为可能的选项:

ListLinePlot[{{{0, 0}, {1, -1}, {2, -2}, {3, -1}, {4, -2}, {5, -3}, {6, -4}, {7, -3}, {8, -2}, {9, -1}}}]

感谢您的帮助。

修改

更一般地说,如何调整x轴上的单位间隔与y轴上的单位间隔的比率? AspectRatio选项似乎与它没有直接关联。

1 个答案:

答案 0 :(得分:11)

你想:AspectRatio -> Automatic


请求的概括示例:

p = Plot[Sin[x], {x, 0, 10}];
range = First /@ Differences /@ (PlotRange /. Options[p]);
target = 1/2;(* 1 y == 2 x *)
Show[p, 
 AspectRatio -> (Last[range]/First[range]/target)]

(默认情况下Plot将包含显式的绘图范围,因此我们可以使用Options,只要我们不设置PlotRange->All之类的内容。)