Re: More Epilogs
- To: mathgroup at smc.vnet.net
- Subject: [mg23671] Re: More Epilogs
- From: Jens-Peer Kuska <kuska at informatik.uni-leipzig.de>
- Date: Mon, 29 May 2000 12:24:01 -0400 (EDT)
- Organization: Universitaet Leipzig
- References: <8gso7v$efd@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
Hi,
Show[FullGraphics[p1], FullGraphics[p2], DisplayFunction ->
$DisplayFunction]
Regards
Jens
"F. Mittermayr" wrote:
>
> Hi,
> does anyone know how to combine 2 plots with 2 epilogs in a Show command??
>
> p1=Plot[Sin[x], {x,0,2 Pi}, Epilog-> {PointSize[0.05],Hue[1],Point[{0,1}]},
> DisplayFunction->Identity];
> p2=Plot[Cos[x], {x,0,2 Pi}, Epilog-> {PointSize[0.05],Hue[1],Point[{0,0}]},
> DisplayFunction->Identity];
> Show[p1,p2,DisplayFunction->$DisplayFunction]
>
> unfortunately only one Epilog is plotted.
>
> Thnx for any ideas
> F. Mittermayr