Re: opacity "bleeds" in V7 graphics? [compared to V6]
- To: mathgroup at smc.vnet.net
- Subject: [mg95836] Re: opacity "bleeds" in V7 graphics? [compared to V6]
- From: Jens-Peer Kuska <kuska at informatik.uni-leipzig.de>
- Date: Wed, 28 Jan 2009 06:32:27 -0500 (EST)
- Organization: Uni Leipzig
- References: <glmss7$mkd$1@smc.vnet.net>
- Reply-to: kuska at informatik.uni-leipzig.de
Hi,
this is a bug but
obj = Plot3D[Sin[x^2 + y^2], {x, -3, 3}, {y, -3, 3}, PlotPoints -> 40,
Mesh -> None, BoundaryStyle -> None];
obj /. GraphicsComplex[pnts_, dta_, more___] :>
GraphicsComplex[pnts, dta, more,
VertexColors -> (RGBColor[0, 0, 1, First[(# + 2)/4]] & /@ pnts)]
may help.
Regards
Jens
congruentialuminaire at yahoo.com wrote:
> 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
>