Re: 3D-Plots: Coloring edges (simple)

*To*: mathgroup at smc.vnet.net*Subject*: [mg26791] Re: 3D-Plots: Coloring edges (simple)*From*: adam_smith at my-deja.com*Date*: Wed, 24 Jan 2001 04:18:34 -0500 (EST)*References*: <943dn4$cju@smc.vnet.net>*Sender*: owner-wri-mathgroup at wolfram.com

Giving due credit to the 3 who posted before me. Perhaps the easiest way to accomplish this is the following: ParametricPlot3D[{x, y, x*y, EdgeForm[Hue[x*y]]}, {x, -1, 1}, {y, -1, 1}, AmbientLight -> GrayLevel[1]] Where I have used the function z=x*y from Allan Hayes example. You can of course play with the the argument of the Hue[] and AmbientLighting-> option to fine tune the output. Adam Smith In article <943dn4$cju at smc.vnet.net>, 24stoffel at my-deja.com wrote: > > > I need to color the edges of a 3D-Plot according > to a predefined ColorFunction, pretty much the > same way as it works for the surface itself, > e.g. ColorFunction->(Hue[1-#*0.45]&). > > How can one apply this function to the edges > only because MeshStyle->(Hue[1-#*0.45]&) > or so obviously doesn't work. It certainly > can be done because one of the color charts > in the Mathematica book has a Klein bottle > colored like this. > > Thanks a lot in advance. > > Stoffel > Email: ch_karner at yahoo.com > > Sent via Deja.com > http://www.deja.com/ > > Sent via Deja.com http://www.deja.com/