Eigenes Bild in Plot3d verwend < Mathematica < Mathe-Software < Mathe < Vorhilfe
|
| Aufgabe | Hallo,
ich möchte gern ein 3-d Plot erstellen, dessen Oberfläche nicht Mathematica-Standardblau ist, sondern ein von mir importiertes Bitmap darstellt.
|
Weiß jemand, wie das funktioniert?
Bitte helft mir.
Gruß,
Kerstin
PS: Ich habe diese Frage in keinem Forum auf anderen Internetseiten gestellt.
|
|
| |
|
| Status: |
(Mitteilung) Reaktion unnötig  | | Datum: | 17:20 Do 02.09.2010 | | Autor: | matux |
$MATUXTEXT(ueberfaellige_frage)
|
|
|
| |
|
| Status: |
(Mitteilung) Reaktion unnötig | | Datum: | 15:00 Fr 03.09.2010 | | Autor: | Peter_Pein |
Hallo Kerstin,
falls Dir so etwas ähnliches
[Dateianhang nicht öffentlich]
vorschwebt, dann lohnt es sich vermutlich einen Blick in den ![[a]](/images/paperclip.gif "Dateianhänge") Anhang zu werfen...
Gruß,
Peter
P.S.: da mir die Rechte am Originalbild nicht bekannt sind, musst Du das Notebook anpassen, indem Du eines Deiner Bilder importierst :-(
P.P.S.:
mit Interpolation geht's noch etwas einfacher:
| 1: | ras3=Rasterize[Import[NotebookDirectory[]<>"Taube.jpg"]];
| | 2: | {fr,fg,fb}=Table[ListInterpolation[ras3[[1,1,All,All,k]]/255,{{0,1},{0,1}}],{k,3}];
| | 3: | cfint[x_,y_]:=RGBColor@@Through[{fr,fg,fb}[y,x]];
| | 4: | Plot3D[x^2+y^3,{x,0,1},{y,0,1},ColorFunction->(cfint[#1,#2]&),Lighting->"Neutral",Mesh->False,PlotPoints->55] |
Dateianhänge:
Anhang Nr. 1 (Typ: jpg) [nicht öffentlich]
Anhang Nr. 2 (Typ: nb) [nicht öffentlich]
|
|
|
|
![[]](/images/popup.gif){kind=small}
http://blog.wolfram.com/2007/06/22/mathematicas-true-colors/
