Mathematica 9 is now available
Services & Resources / Wolfram Forums / MathGroup Archive
-----

MathGroup Archive 2012

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

Search the Archive

Re: Epilog/Prolog and Show Question

  • To: mathgroup at smc.vnet.net
  • Subject: [mg128162] Re: Epilog/Prolog and Show Question
  • From: E. Martín-Serrano <eMartinSerrano at telefonica.net>
  • Date: Thu, 20 Sep 2012 00:23:06 -0400 (EDT)
  • Delivered-to: l-mathgroup@mail-archive0.wolfram.com
  • Delivered-to: l-mathgroup@wolfram.com
  • Delivered-to: mathgroup-newout@smc.vnet.net
  • Delivered-to: mathgroup-newsend@smc.vnet.net

Dan,

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 comcast.net]
Enviado el: mi=E9rcoles, 19 de septiembre de 2012 10:58
Para: mathgroup at smc.vnet.net
Asunto: Re: Epilog/Prolog and Show Question

Dan,

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}]],
    Inset[Graphics[Circle[]]]}]

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.

<<Presentations`

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

Or even more simply without Inset:

Draw2D[
 {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 comcast.net
http://home.comcast.net/~djmpark/index.html


From: Dan O'Brien [mailto:danobrie at gmail.com]


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[]]]] 
Show[aa,
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