MathGroup Archive 2005

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

Search the Archive

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
| 



  • 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