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