Re: Eigenheiten von Show

["Udo und Susanne Krause" <su.krause@XXXXXXX.ch>]

Hallo zusammen,

Show[#, Epilog -> Last /@ FilterRules[Cases[#, _Rule, Infinity],  
Epilog]]&[{pl1, pl2}]

genuegt.

Gruss
Udo.


On Fri, 28 Nov 2014 12:01:14 +0100, Robert Nowak <robert.nowak@XXXXXXX.at>  
wrote:

> Hallo,
>
> etwas eleganter und universeller aber auch nicht mühelos,
> zumindest braucht man nicht genau zu wissen wo der Epilog sich versteckt  
> :)
>
> GetEpilog := Cases[#, HoldPattern[Epilog -> e_] -> e, \[Infinity]] &
>
> Show[LL, Epilog -> GetEpilog /@ LL]