| Author |
Comment/Response |
Bill
|
 10/03/10 5:42pm
Hi again:
The colors here are more vibrant than the colors in my last post, and somewhat different:
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},
Mesh -> False, Boxed -> False,
Axes -> None, ColorFunction -> Function[{x, y, z}, Hue[z]],
Background -> Black, ImageSize -> 500]
Have a nice day,
Bill
URL: , |
|
