MathGroup Archive 2004

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

Search the Archive

Re: PlotRange

  • To: mathgroup at smc.vnet.net
  • Subject: [mg48463] Re: [mg48452] PlotRange
  • From: DrBob <drbob at bigfoot.com>
  • Date: Mon, 31 May 2004 00:13:46 -0400 (EDT)
  • References: <200405301012.GAA05048@smc.vnet.net>
  • Sender: owner-wri-mathgroup at wolfram.com

Here's a partial solution:

DisplayTogether[Plot[Sin@x, {x, 0.5, 1}],
     Plot[Sin@x, {x, 0, 0.5}]];

Or, with Dave Park's amazing package:

Needs["DrawGraphics`DrawingMaster`"]
Draw2D[{Thickness[.01], Red, Draw[Sin@x, {x, 0.5, 1}], Blue,
       Draw[Sin@x, {x, 0, 0.5}]},
     Background -> Antique, Frame -> True
     ];

Two PlotRanges like yours can't be combined into a single PlotRange, so far as I can tell, even in principle.

Bobby

On Sun, 30 May 2004 06:12:13 -0400 (EDT), Bruce W. Colletti <bcolletti at compuserve.com> wrote:

> Re Mathematica 5.0.1.0.
>
> Using PlotRange, can we plot two graphs in different quadrants?  For
> instance:
>
>     Plot[Sin@x,{x,-2Pi,2Pi},PlotRange->{{.5,1},{.5,1}}]
>
> shows in display area Quadrant 1 while:
>
>     Plot[Sin@x,{x,-2Pi,2Pi},PlotRange->{{0,.5},{0,.5}}]
>
> shows in Quadrant 3.
>
> When entered as shown above, each image is a separate graphics object.
> But is there a way (without using Graphics Array) to combine them into
> one object whose Quadrants 1 and 3 are filled?
>
> Thanks.
>
> Bruce
>
>



-- 
DrBob at bigfoot.com
www.eclecticdreams.net/index.html


  • References:
    • PlotRange
      • From: "Bruce W. Colletti" <bcolletti@compuserve.com>
  • Prev by Date: RE: PlotRange
  • Next by Date: Re: SetPrecision - What does in find?
  • Previous by thread: PlotRange
  • Next by thread: RE: PlotRange