Visible mesh edges in PDF output of 3D graphic
- To: mathgroup at smc.vnet.net
- Subject: [mg130135] Visible mesh edges in PDF output of 3D graphic
- From: David Reiss <dbreiss at gmail.com>
- Date: Wed, 13 Mar 2013 04:20:28 -0400 (EDT)
- Delivered-to: l-mathgroup@mail-archive0.wolfram.com
- Delivered-to: l-mathgroup@wolfram.com
- Delivered-to: mathgroup-newout@smc.vnet.net
- Delivered-to: mathgroup-newsend@smc.vnet.net
Consider the following plot:
graphicTest=
ContourPlot3D[{h==0,g==0},{x,-2,2},{y,-2,2},{z,-2,2},
MeshFunctions->{Function[{x,y,z,f},h-g]},
MeshStyle->{{Thick,Black,Opacity[1]}},
Mesh->{{0}},
ContourStyle->{
Directive[Orange,Opacity[.5],Specularity[White,30]],
Directive[Purple,Opacity[.3],Specularity[Green,30]]},
PlotPoints->30,
Boxed->False,
(*Axes->False,*)
BoxRatios->Automatic,
PlotRange->{All,All,{-2,2}}
]
Then export it as a PDF and look at it in a PDF viewer (insert your
directory path at <<<your directory path here>>> to make this work):
Export["<<<your directory path here>>>/
testGraph.pdf",graphicTest,"PDF"]//SystemOpen
Look at the resulting PDF. You will see the lattice of the underlying
plot mesh visible. Is there any way to get rid of this? Note that I
expect to see the fasceted nature of the graphic, but the explicit
differently colored edges are not desired.