MathGroup Archive 2005

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

Search the Archive

Re: Desperate help


Hi,


<< Graphics`ParametricPlot3D`

Block[{$DisplayFunction = Identity},
  SphericalPlot3D[Abs[SphericalHarmonicY[3, 2, th, 
ph]],
   {th, 0, Pi}, {ph, 0, 2Pi}]] /.
   Polygon[pnts_] :> Polygon[{1, 2, -2} + # & /@ 
pnts] // Show

Regards

  Jens

"nomad111" <g_h_111 at hotmail.com> schrieb im 
Newsbeitrag news:dj4pck$h43$1 at smc.vnet.net...
| hi every1
| i really need to kno how to move the center of a 
circle in SphericalPlot3D. I need the center at 
(1,2,-2) and any radius (say 5).
| Appreciate any help
|
| Regards,
| nomad111
| 



  • Prev by Date: Re: boolean function, interpolation
  • Next by Date: Set construction with condition
  • Previous by thread: Desperate help
  • Next by thread: Re: Desperate help