MathGroup Archive 2012

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

Search the Archive

Re: Epilog/Prolog and Show Question

  • To: mathgroup at
  • Subject: [mg128162] Re: Epilog/Prolog and Show Question
  • From: E. Martín-Serrano <eMartinSerrano at>
  • Date: Thu, 20 Sep 2012 00:23:06 -0400 (EDT)
  • Delivered-to:
  • Delivered-to:
  • Delivered-to:
  • Delivered-to:


As David says:

"Or even more simply without Inset".

his remark involves much more than code simplification, because as soon as
one goes beyond a toy, or even in small toys, 'Inset' induces a lot of
performance inconvenience  when dealing  with other dynamics stuff in the
graphics, (either the inset stuff being static or dynamic) and much more
when using locators.  Particularly, in the case of locators I would avoid
mixing them with 'Inset' as much as possible, and even more if locators and
Bezier curves are to be put together.

As per the many times mentioned locators' issue, right now I am working on a
notebook (still a small toy) which does not work with locators but works
perfectly with 2D Sliders. It seems to indicate that the rest of the
construct is OK, otherwise it would not work with 'Slider2D' either.

I have experienced the 'Inset' issue with locators many times; as soon as
the inset stuff in the graphics is removed the problem mostly disappear. 

E. Martin-Serrano

-----Mensaje original-----
De: djmpark [mailto:djmpark at]
Enviado el: mi=E9rcoles, 19 de septiembre de 2012 10:58
Para: mathgroup at
Asunto: Re: Epilog/Prolog and Show Question


It has to do with the strange way that Show combines Options from the
various plots. Put all of the Epilog material in a single Epilog in the Show
statement. Essentially, that Epilog preempts any of the Plot Epilogs.

bb = Plot[Sin[x], {x, 0, 30}]
Show[bb, Epilog -> {Inset[Graphics[Disk[{.4, .4}]], Scaled[{.2, .2}]],

I'm not certain what your objective is with the graphics, but it could be
done much more simply and intuitively with the Presentations Application.


 {Draw[Sin[x], {x, 0, 30}],
  Inset[Graphics[Disk[{.4, .4}]], Scaled[{.2, .2}]],
 AspectRatio -> 1/GoldenRatio,
 Frame -> True]

Or even more simply without Inset:

 {Draw[Sin[x], {x, 0, 30}],
  Circle[{5 \[Pi], 0}, Offset[70]],
  Disk[Scaled[{0.2, 0.2}], Offset[70]]},  AspectRatio -> 1/GoldenRatio,
Frame -> True]

David Park
djmpark at

From: Dan O'Brien [mailto:danobrie at]

Can someone explain why Show drops the original Inset Circle[]?  And how I
could make it not forget?

aa = Plot[Sin[x], {x, 0, 30}, Epilog -> Inset[Graphics[Circle[]]]] 
Epilog -> Inset[Graphics[Disk[{.4, .4}]], Scaled[{.2, .2}]]]

bb = Plot[Sin[x], {x, 0, 30}, Epilog -> Inset[Graphics[Circle[]]]] Show[bb,
Epilog -> Inset[Graphics[Disk[{.4, .4}]], Scaled[{.2, .2}]]]

  • Prev by Date: Re: set option flag in function definition
  • Next by Date: Copying Text From CDF Output Cells
  • Previous by thread: Re: Epilog/Prolog and Show Question
  • Next by thread: set option flag in function definition