Re: a Graphic in a Graphic
- To: mathgroup at smc.vnet.net
- Subject: [mg22333] Re: a Graphic in a Graphic
- From: "Allan Hayes" <hay at haystack.demon.co.uk>
- Date: Fri, 25 Feb 2000 21:13:23 -0500 (EST)
- References: <892pao$pj3@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
Andre, Rectangle can be used for this: gr = Plot3D[Sin[x + Cos[y]], {x, 0, 2Pi}, {y, 0, 2Pi}] Plot[Sin[x], {x, 0, 2Pi}] Show[%, Graphics[Rectangle[{Pi, 0}, {2Pi, 1}, gr]]] Allan --------------------- Allan Hayes Mathematica Training and Consulting Leicester UK www.haystack.demon.co.uk hay at haystack.demon.co.uk Voice: +44 (0)116 271 4198 Fax: +44 (0)870 164 0565 "Andre Heinemann" <andre at aflo4.ifw-dresden.de> wrote in message news:892pao$pj3 at smc.vnet.net... > Hi All, > > I'm running Mathematica 4.0 and want to create > a graphic into a graphic, but all I did up to day > doesn't work very well. > If I have a graphic object (e.g. a MultipleListPlot) > I want to put a small Plot into this Graphics > like one can do this with Legends or Text: > > Show[Graphics{MultipleListPlot[...],Text["...",{xPos.yPos}]}; > > instead of Text[] at xPos, yPos I want to put > a small Plot[...,{}, ImageSize-> {xSize,ySize}]; > in this Graphic. > > Can you help me ? > > Andre > >