Re: a Graphic in a Graphic

*To*: mathgroup at smc.vnet.net*Subject*: [mg22354] Re: a Graphic in a Graphic*From*: James Fuite and Tania Nordli <jfuite at UAlberta.ca>*Date*: Fri, 25 Feb 2000 21:13:59 -0500 (EST)*Organization*: University of Alberta, Edmonton, Canada*References*: <892pao$pj3@smc.vnet.net>*Sender*: owner-wri-mathgroup at wolfram.com

Dear Andre, I have have a functioning plot similar to the one you are describing, it is a list plot within a list plot. I have left in a few of the options I used as suggestions to make the small plot distinct from the main plot. I think you could just alter this basic form to suit your needs. ListPlot[datalist, Background -> RGBColor[0.89, 0.93, 1], Prolog -> {AbsolutePointSize[6], Rectangle[Scaled[{0.18,0.16}], Scaled[{1,0.95}], ListPlot[datalistII, Background -> RGBColor[0.94, 0.97, 1], PlotStyle -> RGBColor[1,0,0], Frame -> True, Prolog -> {AbsolutePointSize[4], Text[StyleForm["Small Graph Title", FontColor -> RGBColor[0.11, 0.30, 0.53] ](*StyleForm*), Scaled[{0.7,0.6}] ](*Text*) }(*Prolog*), DisplayFunction->Identity] ](*Rectangle*) }(*Prolog*) ](*ListPlot*) Sincerely, James J. Fuite. Of course you may ignore all uses of (* *). Andre Heinemann wrote: > 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