Roger,
To obtain better quality plots, it is generally better to try the
MaxRecursion option before increasing PlotPoints. So the following looks
much better.
Plot3D[Sin[x^2 + y^2], {x, -3, 3}, {y, -3, 3},
ColorFunction -> (Directive[Opacity[#1], Blue] &),
MaxRecursion -> 4,
Mesh -> None]
David Park
djmpark at comcast.net
http://home.comcast.net/~djmpark/
From: congruentialuminaire at yahoo.com [mailto:congruentialuminaire at yahoo.com]
Hello MathGroup:
I am not sure about this problem. Currently all I can tell is that the
result looks different between the 2 versions and we used to call this
"bleeding".
The input run under both version is:
Plot3D[Sin[x^2 + y^2], {x, -3, 3}, {y, -3, 3}
, ColorFunction -> (Directive[Opacity[#], Blue] &)
, PlotPoints -> 40, Mesh -> None]
Any help you can provide is appreciated.
Regards..
Roger Williams
Franklin Laboratory