Re: GIF-Graphik transparent mit Funktions-Plot ueberlagern

[Jens-Peer Kuska <kuska@XXXXXXX.de>]

Hallo,

ein frame ist bei mir ein einzelnes Bild eines
Films aber falls 

bm = Import["/export/home/kuska/mathpng2/Pictures/tiger.png"];
gr = Plot[Sin[x], {x, 0, Pi}];

Show[
  bm /. Graphics[r_Raster, opts___] :>
      Graphics[{r, {{GrayLevel[0.9], Rectangle[{50, 50}, {125, 125}]}, 
            Rectangle[{50, 50}, {125, 125}, gr]}}, opts]
  ]


oder

Show[gr /. Graphics[data_, opt_] :>
      Graphics[Append[data,
          Rectangle[{2, 0.5}, {3, 1}, bm]
          ]
        ], Frame -> True
  ]

gemeint sein sollte, kann man sich dirch Angabe der Eckpunkte
des Rectangle[] ja wohl ganz genau "uberlegen wo das Ding
hin soll und wie gross es ist.

Gruss
  Jens


Gunter Woysch wrote:
> 
> Stuttgart, den 23. August 2004
> 
> Hallo,
> 
> Vielen Dank !
> -----------
> 
> zuerst einmal vielen Dank fuer diese informative Antwort !
> 
> Ich habe sie mit dem Sonnenbild von Stefan Seip ausprobiert, und es
> funktioniert sogar schon unter MMa 4.0 !
> 
> Der zweite Teil meiner Aufgabenbeschreibung
> -------------------------------------------
> 
> lautete :
> 
> > Im Ergebnis muessten also beide Elemente einander ueberlagert werden,
> > sie muessten in der Groesse aneinander angepasst worden sein koennen, und
> 
> > sie sollten vielleicht noch kontrolliert gegeneinander verschoben werden
> koennen.
> 
> In Frageform koennte man das vielleicht so formulieren :
> 
>   Angenommen, der Plot besitzt einen Frame,
> 
>   wie schafft man es dann,
> 
>   diesen Frame
> 
>     _in definierbarer relativer Groesse_ _an definierbarer Stelle_ auf der
> Grafik
> 
>   zu platzieren,
> 
>   oder umgekehrt
> 
>   die Grafik
> 
>     _in definierbarer relativer Groesse_ _an definierbarer Stelle_ auf dem
> Plot
> 
>   zu platzieren ?
> 
> Danke fuer jeden weiteren Hinweis !
> 
> Mit freundlichen Gruessen,
> 
> Gunter Woysch
> 
> -------------------- Beginn der ursprünglichen Nachricht
> --------------------
> 
> Message text written by INTERNET:kuska@XXXXXXX.de
> 
> "Sender: kuska@XXXXXXX.de
> Date: Mon, 23 Aug 2004 14:07:10 +0200
> From: Jens-Peer Kuska <kuska@XXXXXXX.de>
> Reply-To: kuska@XXXXXXX.de
> To: Gunter Woysch <Gunter_Woysch@XXXXXXX.com>
> CC: Deutsche Mathematica News Group <demug@XXXXXXX.ch>
> Subject: Re: GIF-Graphik transparent mit Funktions-Plot ueberlagern
> 
> Hallo,
> 
> a) Mathematica mit seiner PostScript basierten Graphik unterst"utzt
>    keine Transparenz. Die Tranzparenz in GIF-Bildern bezieht sich eh
>    nur auf einen Paletten-Eintrag und daher eigentlich "uberfl"ussig
> 
> b) he "transparent .. ueberlagert" was is'n das, wenn's Durchsichtig
>    ist, sieht man es nicht und man kann sich den Quatsch sparen falls
>    allerdings
> 
> bm = Import["/export/home/kuska/mathpng2/Pictures/tiger.png"]
> Plot[Sin[1/x], {x, 0, Pi},
>   PlotStyle -> {RGBColor[1, 1, 0]},
>   Prolog -> (bm[[1]] /.
>         Raster[arr_, range_, args___] :>
>           Raster[arr, {{0, -1}, {Pi, 1}}, args]), AspectRatio -> 1,
>   PlotRange -> All]
> 
>   gemeint ist, braucht man daf"ur keine Transparenz.
> 
> Und nat"urlich kann man auch ein Bild von seinem Dackel nehmen
> wenn man keinen Tiger zur Hand hat.
> 
> Gruss
>   Jens
> 
> Gunter Woysch wrote:
> >
> > Stuttgart, den 22. August 2004
> >
> > An alle Mathematica-Kundigen !
> >
> > Nehmen Sie an, es liege eine importierte GIF-Graphik vor, und dieser
> > GIF-Grafik solle transparent ein Funktions-Plot ueberlagert werden.
> >
> > Im Ergebnis muessten also beide Elemente einander ueberlagert werden, sie
> > muessten in der Groesse aneinander angepasst worden sein koennen, und sie
> > sollten vielleicht noch kontrolliert gegeneinander verschoben werden
> > koennen.
> >
> >   Wie kann man das mit Mathematica realisieren - moeglichst auch mit MMa
> 4 ?
> >
> > Vielen Dank fuer jeden Hinweis !
> >
> > Mit freundlichen Gruessen,
> >
> > Gunter Woysch"
> 
> -------------------- Ende der ursprünglichen Nachricht --------------------
> 
>   ------------------------------------------------------------------------
>                           Name: sun_stefan_seip.jpg
>    sun_stefan_seip.jpg    Type: JPEG Image (image/jpeg)
>                       Encoding: base64