MathGroup Archive 1997

[Date Index] [Thread Index] [Author Index]

Search the Archive

Coloring Graphics.

  • To: mathgroup at smc.vnet.net
  • Subject: [mg9596] Coloring Graphics.
  • From: phbrf at t-online.de (Peter Breitfeld)
  • Date: Thu, 13 Nov 1997 23:24:07 -0500
  • Organization: T-Online
  • Sender: owner-wri-mathgroup at wolfram.com

I have a problem coloring my 3D - output.

There is 

peb=Plot3D[eb[x,y],{x,-10,10},{y,-15,15},
	DisplayFuction->Identity];

puk another Plot3D.

I want the graph ``peb'' plotted in pure red and ``puk'' colored the
default way. So I tried

Show[puk, {RGBColor[1,0,0],peb}, 
	DisplayFunction->$DisplayFunktion]; 

and a lot of other possibilities, but no success. First I replaced
``eb[x,y]'' with ``{e[x,y],RGBColor[1,0,0]}'' in the definition of
``peb''  and peb plot red, but combining the graphics with show
switches back to default coloring.

If I switch the order i.e

Show[peb,puk, ...]

peb will be red, but puk is black (??)

Any help very welcome!

es gruesst
   - Peter

  +======_/_/_/_/===_/_/_/_/===_/_/_/_/== Peter Breitfeld ===========+
  |     _/     _/  _/     _/  _/          Kreuzgasse 4               |
  |    _/_/_/_/   _/_/_/_/   _/_/_/       88348 Saulgau / GERMANY    |
  |   _/     _/  _/   _/    _/            eMail: phbrf at t-online.de   |  

  +==_/_/_/_/===_/=====_/==_/============(PGP Public Key available)==+
 



  • Prev by Date: RE: Plot Complex Interpol .Func.
  • Next by Date: Re: How do I tell Mathematica than n is an integer?
  • Previous by thread: Programming Challenge
  • Next by thread: Re: Coloring Graphics.