Re: Plot inset?
- To: mathgroup at smc.vnet.net
- Subject: [mg33716] Re: Plot inset?
- From: Tim Brophy <timbrophy at eircom.net>
- Date: Mon, 8 Apr 2002 03:05:00 -0400 (EDT)
- References: <a8m2tm$oad$1@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
On 4/6/02 8:00 AM, in article a8m2tm$oad$1 at smc.vnet.net, "Eric Dennis"
<edennis at princeton.edu> wrote:
> Is it possible to display a plot as a small inset
> in a larger plot? Couldn't find any reference to
> this in the help browser, but it seems like
> something that should be doable. Maybe there's
> just some kind of "superpose graphics" option(?).
>
> Thanks,
> Eric
>
Use the "Rectangle" function as follows:
p1 = Plot[Sin[x], {x, 0, 2\[Pi]}]
p2 = Plot[Sin[x], {x, 0, 1}, Ticks -> None]
Show[Graphics[{Rectangle[{0, 0}, {1, 1}, p1], Rectangle[{0.8, 0.8}, {1, 1},
p2]}]]
This will do it for you.
Tim Brophy