> -----Original Message-----
> From: Oliver.Tonn@XXXXXXX.de [SMTP:Oliver.Tonn@XXXXXXX.de]
> Sent: Tuesday, February 12, 2002 11:32 AM
> To: kuska@XXXXXXX.de
> Cc: dmug@XXXXXXX.ch
> Subject: Antwort: Re: Farbe von Prolog/Epilog ändern (MMA4.0
>
>
> Nochmals hallo,
>
> erstmal danke für den Tip. Jetzt ist der Prolog in einer anderen Farbe
> leider überdeckt er die Beschriftung. Kann man in MMA, ähnlich wie in
> Zeichenprogrammen, die Reihenfolge der Elemente festlegen, z.B. Achse ist
> die unterste Ebene, darauf den Prolog und darüber die Ticks zeichnen?
>
> Gruß Oliver
>
[Hartmut Wolf]
...überdeckt die Beschriftung von was?
Wenn es um Achsen, Ticks geht, dann versuch mal
<<Graphics`FilledPlot`
Dieses Paket modifiziert Show so daß sie jetzt die Option
AxesFront -> True versteht.
Ansonsten werden die Achsen, Ticks usw. von Show gemalt,
_bevor_ die eigentliche Graphik dran ist.
<< "Graphics`FilledPlot`"
g = Plot[Sin[x^Cos[x]], {x, 0, 2*Pi},
Prolog -> {{Hue[1/6, 0.3, 1],
Disk[Scaled[{0.5, 0.45}], Scaled[{0.3, 0.1}]]},
{Hue[5/12], Thickness[0.01],
Circle[Scaled[{0.5, 0.45}], Scaled[{0.3, 0.1}]],
Hue[10/12], Dashing[{0.005, 0.02}],
Circle[Scaled[{0.5, 0.45}], Scaled[{0.3, 0.1}]]},
Hue[0], Text["Helau!", Scaled[{0.5, 0.45}], {0, 0},
TextStyle -> {FontSize -> 24, FontWeight ->
"Bold"}]}, PlotStyle -> {Hue[7/12]},
DisplayFunction -> Identity]
Show[g, AxesFront -> True, DisplayFunction ->
$DisplayFunction]
Eine andere Möglichkeit wäre
Show[FullGraphics[g], DisplayFunction -> $DisplayFunction,
PlotRegion->{{0.05,1},{0,1}}]
da werden zuerst die Achsen, Ticks usw. in graphische Primitive
gewandelt, die dann ganz normal gezeichnet werden (nach dem Prolog).
Wenn du genau hinschaust, dann wirst du feststellen, das ist
nicht _genau_ dasselbe. Warum, das ist dann eine Preisfrage.
Ansonsten: ein kleines Beispiel ist manchmal hilfreich.
--
Hartmut