RE: How to display one plot as an inset in another plot?

*To*: mathgroup at smc.vnet.net*Subject*: [mg35409] RE: [mg35334] How to display one plot as an inset in another plot?*From*: "John C. Erb, Ph.D." <John_C_Erb at prodigy.net>*Date*: Thu, 11 Jul 2002 05:24:17 -0400 (EDT)*Reply-to*: <John_C_Erb at prodigy.net>*Sender*: owner-wri-mathgroup at wolfram.com

One could use the Rectangle function. An example of this is given in Section 5.2 (pages 114-116) of the book Applied Mathematica, Getting It Started Getting It Done, by Shaw and Tigg. An example: Plot1=Plot[Sin[x],{x,0,2Pi}]; Plot2=Plot[2x^2+5x, {x,0,2Pi}]; Show[Graphics[{Rectangle[{0,0},{1,1},Plot1], Rectangle[{0.55,0.45},{0.95,0.9},Plot2]}]]; John C. Erb email: John_C_Erb at prodigy.net -----Original Message----- From: AES [mailto:siegman at stanford.edu] To: mathgroup at smc.vnet.net Subject: [mg35409] [mg35334] How to display one plot as an inset in another plot? How to display one (complete) plot as an inset (maybe scaled, certainly offset) within (or on top of) another plot? Kind of a Show[ plot1, {Scaled[0.5], Offset[{2,2}], plot2} ] capability.