Re: Desperate help
- To: mathgroup at smc.vnet.net
- Subject: [mg61476] Re: Desperate help
- From: "Jens-Peer Kuska" <kuska at informatik.uni-leipzig.de>
- Date: Wed, 19 Oct 2005 23:07:25 -0400 (EDT)
- Organization: Uni Leipzig
- References: <dj4pck$h43$1@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
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 |