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