|
|
Re: Epilog/Prolog and Show Question
Posted:
Sep 19, 2012 4:57 AM
|
|
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@comcast.net
http://home.comcast.net/~djmpark/index.html
From: Dan O'Brien [mailto:danobrie@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}]]]
|
|
