 
 
 
 
 
 
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

