Re: Re: adjusting frame size in plot
- To: mathgroup at smc.vnet.net
- Subject: [mg20289] Re: [mg20279] Re: adjusting frame size in plot
- From: BobHanlon at aol.com
- Date: Tue, 12 Oct 1999 03:39:29 -0400
- Sender: owner-wri-mathgroup at wolfram.com
Martin,
One possibility is to add to both plots the same "invisible" tick label which
is longer than their tick labels otherwise would be. This will produce the
same spacing on both. Unfortunately, this requires that the tick labels be
handled explicitly. However, it handles the spacing fairly easily.
Show[GraphicsArray[{{Plot[Sin[x], {x, 0, 2 Pi},
Ticks -> {Automatic,
Join[Table[{y, y}, {y, -1, 1, .5}], {{0.1,
StringJoin[Table[" ", {5}]]}}]},
DisplayFunction -> Identity]}, {Plot[10000 Sin[x], {x, 0, 2Pi},
Ticks -> {Automatic,
Join[Table[{y, y}, {y, -10000, 10000, 5000}], {{0.1,
StringJoin[Table[" ", {5}]]}}]},
DisplayFunction -> Identity]}}],
DisplayFunction -> $DisplayFunction];
Bob Hanlon
In a message dated 10/11/1999 7:04:10 AM, martin.heimann at bgc-jena.mpg.de
writes:
>can I reiterate Scot's question? This is an old shortcoming of
>Mathematica und I'm not aware if it has been corrected in Version 4. Look
>at the simple case of two stacked diagrams:
>
>Show[GraphicsArray[{{Plot[Sin[x], {x, 0, 2 Pi},
> DisplayFunction -> Identity]}, {Plot[10000 Sin[x], {x, 0, 2
>Pi},
> DisplayFunction -> Identity]}}],
> DisplayFunction -> $DisplayFunction]
>
>The fact that one cannot stack different plots over the same x-axis
>without trial and error is a serious shortcoming of Mathematica. Any
>decent scientific graphics package can do this! It effectively means that
>one has to export the data to annother graphics package... I hope that
>somebody from WRI can comment on this. Is there a workaround? or at least
>something in the pipeline for the next upgrade of Mathematica?
>
>Cheers,
>Martin Heimann
>
>Scot wrote:
>
>> I have 2 near-identical plots, one with a range from 0 to 100 and the
>> other with a range from 0 to 20. As the tick label 100 is longer than
>> 20, the corresponding graph has a smaller frame.
>>
>> How can I force the two graphs to have the same frame size using
>> Mathematica 3.0?
>