MathGroup Archive 2002

[Date Index] [Thread Index] [Author Index]

Search the Archive

RE: GraphicsArray

  • To: mathgroup at smc.vnet.net
  • Subject: [mg33046] RE: [mg33029] GraphicsArray
  • From: "David Park" <djmp at earthlink.net>
  • Date: Wed, 27 Feb 2002 00:48:04 -0500 (EST)
  • Sender: owner-wri-mathgroup at wolfram.com

Juan,

A different PlotRange was used in each of the GraphicsArray plots. All you
have to do is force the same PlotRange for all plots.

{g1, g2, g3, g4} =
    Graphics[#, PlotRange -> {{-3/2, 3/2}, {1, 3}}] & /@ {l1, l2, l3, l4};

Show[GraphicsArray[{g1, g2, g3, g4}]];

David Park
djmp at earthlink.net
http://home.earthlink.net/~djmp/

> From: Juan [mailto:erfa11 at hotmail.com]
To: mathgroup at smc.vnet.net
>
>
>
> Hi, see what happens here:
> I don&#8217;t get the the real scale of the lines, when I use
> Graphics Array
>
> l1 = {Line[{{-(1/2), 1}, {1/2, 1}}], Line[{{-1, 2}, {1, 2}}],
>       Line[{{-(3/2), 3}, {3/2, 3}}]};
> l2 = {Line[{{-(1/2), 1}, {1/2, 1}}], Line[{{0, 2}, {0, 2}}],
>       Line[{{0, 3}, {0, 3}}]};
> l3 = {Line[{{0, 1}, {0, 1}}], Line[{{-1, 2}, {1, 2}}],
>       Line[{{0, 3}, {0, 3}}]};
> l4 = {Line[{{0, 1}, {0, 1}}], Line[{{0, 2}, {0, 2}}],
>       Line[{{-(3/2), 3}, {3/2, 3}}]};
>
> {g1, g2, g3, g4} = Graphics /@ {l1, l2, l3, l4};
>
> Show[GraphicsArray[{g1,g2,g3,g4}]];
>
> The lines are drawn with the same sizes, in g2, g3, g4, but they have not
> the same sizes.
> The sizes are {1, 2, 3}, like g1.
>
> Does somebody know a way to get the lines in the 3 pictures in the same
> scales?
> FullGraphics does not help, AspectRatio->Automatic either.
>
> Thanks
> Juan Erfá
>
>
>
>
> _________________________________________________________________
> Hable con sus amigos en línea, pruebe MSN Messenger:
http://messenger.msn.es




  • Prev by Date: Re: GraphicsArray
  • Next by Date: RE: GraphicsArray
  • Previous by thread: Re: GraphicsArray
  • Next by thread: Hint on: Problems converting mathematica notebook to PDF with Acrobat Distiller