MathGroup Archive 2004

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

Search the Archive

RE: PlotRange

  • To: mathgroup at smc.vnet.net
  • Subject: [mg48466] RE: [mg48452] PlotRange
  • From: "David Park" <djmp at earthlink.net>
  • Date: Mon, 31 May 2004 00:13:57 -0400 (EDT)
  • Sender: owner-wri-mathgroup at wolfram.com

Bruce,

I'm still not certain of your overall objective, but you could use Rectangle
with the third argument.

plot1 = Plot[Sin[x], {x, -2 Pi, 2Pi}];
plot2 = Plot[Cos[x], {x, -2 Pi, 2Pi}];

Show[Graphics[
      {Rectangle[{0.5, 0.5}, {1, 1}, plot1],
       Rectangle[{0, 0}, {0.5, 0.5}, plot2]}],
    AspectRatio -> Automatic,
    PlotRange -> {{0, 1}, {0, 1}},
    ImageSize -> 500];

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

From: Bruce W. Colletti [mailto:bcolletti at compuserve.com]
To: mathgroup at smc.vnet.net

David

Thank you for the reply that reveals serious typos in my original posting:
all references to PlotRange should instead be to PlotRegion, i.e.:

" Using PlotRegion, can we plot two graphs in different quadrants?  For
instance:

    Plot[Sin@x,{x,-2Pi,2Pi},PlotRegion->{{.5,1},{.5,1}}]

 shows in display area Quadrant 1 while:

     Plot[Sin@x,{x,-2Pi,2Pi},PlotRegion->{{0,.5},{0,.5}}]

shows in Quadrant 3..."

Am sorry for this error:  my pre-posting review apparently wasn't careful
enough.  After awhile, the eyes just become crossed.

Bruce




  • Prev by Date: Re: Number of roots from Solve?
  • Next by Date: Re: PlotRange
  • Previous by thread: RE: PlotRange
  • Next by thread: Re: PlotRange