MathGroup Archive 2000

[Date Index] [Thread Index] [Author Index]

Search the Archive

AW: More Epilogs

  • To: mathgroup at smc.vnet.net
  • Subject: [mg23679] AW: [mg23654] More Epilogs
  • From: Wolf Hartmut <hwolf at debis.com>
  • Date: Mon, 29 May 2000 12:24:07 -0400 (EDT)
  • Sender: owner-wri-mathgroup at wolfram.com


	-----Ursprüngliche Nachricht-----
	Von:	F. Mittermayr [SMTP:mitterma at linz.vai.co.at]
	Gesendet am:	Montag, 29. Mai 2000 05:09
	An:	mathgroup at smc.vnet.net
	Betreff:	[mg23654] More Epilogs

	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


you might like to try

Show[p1, p2, Epilog -> (Epilog /. Rest /@ List @@@ {p1, p2}), 
  DisplayFunction -> $DisplayFunction]

-- Hartmut Wolf

	



  • Prev by Date: Re: Rookie question
  • Next by Date: [Q] accuracy control in eq. solving?
  • Previous by thread: Re: contour-plot & ascii-art
  • Next by thread: [Q] accuracy control in eq. solving?