Mathematica 9 is now available
Student Support Forum
-----
Student Support Forum: '2-parameter surface colouring' topicStudent Support Forum > General > "2-parameter surface colouring"

< Previous Comment | Next Comment >Help | Reply To Comment | Reply To Topic
Author Comment/Response
Toen
10/02/10 07:24am

In Response To 'Re: 2-parameter surface colouring'
---------
Hi Bill,

thanks for your input.

Changing the background does improve my images a little. Unfortunately I don't have a lot of background - I'm concerned with the detail inside a shape similar to

ContourPlot3D[Sin[2 Pi X] Cos [2 Pi Y] + Sin[2 Pi Y] Cos[2 Pi Z] + Cos[2 Pi X] Sin[2 Pi Z] == 0,{X, 0, 2}, {Y, 0, 2}, {Z, 0, 2}, MaxRecursion -> 0]

The colour refresh method is certainly striking. It could perhaps be especially useful for alternating between two one-parameter coloring schemes, so thanks again for that. My current method of alternating is to use mesh division to create a checkered pattern, which is ok but leaves something to be desired.

If you have any more ideas I'd love to hear them.

CircFun[{x_,y_,z_}]:=Sqrt[{x,y,z}.{x,y,z}];

p1=ContourPlot3D[Sin[2Pi X]Cos [2Pi Y]+Sin[2Pi Y]Cos[2Pi Z]+Cos[2Pi X]Sin[2Pi Z]==0,{X,0,2},{Y,0,2},{Z,0,2},
MaxRecursion->0,
PlotPoints->20,
ViewPoint->10{-1,-1,1},
Mesh->{10,10,10},
MeshStyle->None,
MeshShading->{{{Automatic,None},{None,Automatic}},{{None,Automatic},{Automatic,None}}},
ColorFunction->Function[{x,y,z},ColorData["ThermometerColors",CircFun[{x,y,z}]]],
Boxed->False,
Axes->False
];

p2=ContourPlot3D[Sin[2Pi X]Cos [2Pi Y]+Sin[2Pi Y]Cos[2Pi Z]+Cos[2Pi X]Sin[2Pi Z]==0,{X,0,2},{Y,0,2},{Z,0,2},
MaxRecursion->0,
PlotPoints->20,
ViewPoint->10{-1,-1,1},
Mesh->{10,10,10},
MeshStyle->None,
MeshShading->{{{None,Automatic},{Automatic,None}},{{Automatic,None},{None,Automatic}}},
ColorFunction->Function[{x,y,z},ColorData["BlueGreenYellow",CircFun[{1/2-x,1/2-y,1-z}]]],
BoundaryStyle->Directive[Thick,Gray],
Boxed->False, Axes->False
];

Show[p1,p2]



URL: ,

Subject (listing for '2-parameter surface colouring')
Author Date Posted
2-parameter surface colouring Toen 09/28/10 11:01am
Re: 2-parameter surface colouring Bill 09/29/10 2:47pm
Re: Re: 2-parameter surface colouring Toen 10/02/10 07:24am
Re: 2-parameter surface colouring Bill 10/03/10 03:46am
Re: Re: 2-parameter surface colouring Toen 10/04/10 10:19am
Re: 2-parameter surface colouring Bill 10/03/10 5:42pm
Re: Re: 2-parameter surface colouring Toen 10/04/10 2:41pm
Re: 2-parameter surface colouring Bill 10/04/10 10:43pm
Re: Re: 2-parameter surface colouring Toen 10/05/10 5:29pm
Re: Re: Re: 2-parameter surface colouring Bill 10/06/10 5:54pm
< Previous Comment | Next Comment >Help | Reply To Comment | Reply To Topic