Re: Aligning Graphs in GraphicsArray
- To: mathgroup at smc.vnet.net
- Subject: [mg3915] Re: Aligning Graphs in GraphicsArray
- From: hibbarda at central.edu (Al Hibbard)
- Date: Sun, 5 May 1996 23:13:46 -0400
- Organization: Central College, Iowa
- Sender: owner-wri-mathgroup at wolfram.com
In article <4m1hki$pq4 at dragonfly.wolfram.com>, Dirk Kautz <kautz at tyto.bio2.rwth-aachen.de> writes:
>Hi, does anybody know how to align the y-axes of plots with ticks of different
>width in a GraphicsArray ?
>
>In this simple example:
>
>Show[GraphicsArray[{{Plot[x,{x,0,100}]},{Plot[100 x,{x,0,100}]}}]]
>
>Y-Axes don't align. I'm sure somebody has solved this - thanks in advance for any
>help on this!
>
>Dirk
>
Although not a general solution (but one that can be easily modified), the
following kludge will work:
Show[GraphicsArray[{{Plot[x,{x,0,100},Ticks -> {Automatic,
{{20," 20"},{40,40},{60,60},{80,80},{100,
100}}}]},{Plot[100 x,{x,0,100}]}}]]
The idea is to pad with spaces one of the tick labels in the first graph
to match the longest label in the second.
Al Hibbard
==== [MESSAGE SEPARATOR] ====