Re: GraphicsArray and alignment of graphs
- To: mathgroup at smc.vnet.net
- Subject: [mg21262] Re: [mg21099] GraphicsArray and alignment of graphs
- From: Thomas Bohl <Thomas.Bohl at cern.ch>
- Date: Mon, 20 Dec 1999 02:28:25 -0500 (EST)
- Sender: owner-wri-mathgroup at wolfram.com
Hi Bob, thank you very much for sharing your very clever idea of "invisible" FrameTicks. I really like it for its inventiveness. In the meantime I learned that there's a package on MathSource called MongoArray which does (in a very complete way and much more than) what I was looking for: http://www.mathsource.com/Content/Enhancements/Graphics/2D/0208-538 Regards, Thomas. On Sat, 18 Dec 1999 BobHanlon at aol.com wrote: > Use an identical but "invisible" FrameTick on each graph's axis that > is slightly wider than the widest actual tick label. For example, > > fig1 = Plot[x, {x, 0, 10}, Frame -> True, > FrameTicks -> {Automatic, > Join[Table[{k, k}, {k, 0, 10, 2}], > Table[{k, " "}, {k, 0, 10, 1}]], Automatic, Automatic}, > DisplayFunction -> Identity]; > > fig2 = Plot[x^4, {x, 0, 10}, Frame -> True, > FrameTicks -> {Automatic, > Join[Table[{k, k}, {k, 0, 2000, 500}], > Table[{k, " "}, {k, 0, 2100, 100}]], Automatic, Automatic}, > DisplayFunction -> Identity]; > > Show[GraphicsArray[{{fig1}, {fig2}}], ImageSize -> {300, 388}]; > > Bob Hanlon > > In a message dated 12/17/1999 3:29:31 AM, Thomas.Bohl at cern.ch writes: > > >I have got a problem concerning "GraphicsArray and alignment of graphs". > > > > > >The problem is that I could not figure out, how to align horizontally the > >frames of two graphs with identical x-axis (scale), but different y-axis > >(scale) in a convenient way. > > > >To illustrate the problem: > > > >fig1 = Plot[x, {x, 0, 10}, Frame->True] > >fig2 = Plot[x^4, {x, 0, 10}, Frame->True] > >Show[GraphicsArray[{{fig1}, {fig2}}]] > > > >The two frames are not aligned horizontally. > > > >I would like to have both frames aligned horizontally. This is not > >possible with "Align Selected Graphics". I have searched the mathematica > >newsgroup, the site of WRI and just came across the same problem posed > >about five years ago, and then several times again, without finding a > >satisfying answer. > > > >Somebody proposed to apply Rectangle[Scaled[]... to one of the figures > >until they align. However, this is quite a tedious procedure, especially > >if there are several graphs to align. > > > >I think it is quite common in some sciences to make this kind of aligned > >plots, showing for example data & fit in one graph and the residuals in > >another or showing a contourplot in one graph and a projection in another. > > > > > >Please let me know, how to get around this problem (still using > >Mathematica and not exporting the data for another software).