Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
2006
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*November
*December
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 2006

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: No mesh with Graphics3D

  • To: mathgroup at smc.vnet.net
  • Subject: [mg64776] Re: No mesh with Graphics3D
  • From: Peter Pein <petsie at dordos.net>
  • Date: Thu, 2 Mar 2006 19:27:48 -0500 (EST)
  • References: <du6m7d$59o$1@smc.vnet.net>
  • Sender: owner-wri-mathgroup at wolfram.com

giurrero at gmail.com schrieb:
> Hi, I have a Graphics3D generated by SpericalPlot3D and I want to
> eliminate the mesh. How I can do it. I tried to use Mesh->False, but it
> doesn't work, I think I need to convert Graphics3D to GraphicsSurface,
> but I'm not able.
> 
> << Graphics`
> 
> Grafico1 =
>   SphericalPlot3D[
>     Evaluate[
>       Abs[SphericalHarmonicY[2, 1, θ, Ï?]]
>       ],
>     {θ, 0, Ï?}, {Ï?, 0, 2Ï?}]
> 


Grafico1 = SphericalPlot3D[Evaluate[Abs[SphericalHarmonicY[2, 1, θ, Ï?]]],
     {θ, 0, Pi}, {Ï?, -Pi, Pi}, PlotPoints -> {123, 234}, DisplayFunction -> Identity];

Show[Graphics3D[Prepend[First[Grafico1], EdgeForm[]], Sequence @@ Grafico1[[2]]],
    DisplayFunction -> $DisplayFunction];


Peter


  • Prev by Date: Re: No mesh with Graphics3D
  • Next by Date: Re: Help: running external program on Mac OS X
  • Previous by thread: Re: No mesh with Graphics3D
  • Next by thread: Re: No mesh with Graphics3D