Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
2005
*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 2005

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

Search the Archive

Re: Desperate help

  • To: mathgroup at smc.vnet.net
  • Subject: [mg61481] Re: [mg61438] Desperate help
  • From: Bob Hanlon <hanlonr at cox.net>
  • Date: Wed, 19 Oct 2005 23:07:32 -0400 (EDT)
  • Reply-to: hanlonr at cox.net
  • Sender: owner-wri-mathgroup at wolfram.com

Needs["Graphics`"];

Show[
    TranslateShape[
      SphericalPlot3D[5,{theta,0,Pi},{phi,0,2Pi},
        DisplayFunction->Identity],
      {1,2,-2}],
    DisplayFunction->$DisplayFunction];

Show[
    TranslateShape[
      Graphics3D[
        Sphere[5,30,30]],
      {1,2,-2}],
    Axes->True];


Bob Hanlon

> 
> From: nomad111 <g_h_111 at hotmail.com>
To: mathgroup at smc.vnet.net
> Date: 2005/10/19 Wed AM 02:16:18 EDT
> Subject: [mg61481] [mg61438] Desperate help
> 
> 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: Can the user create CellGroupingRules?
  • Next by Date: ListSurfacePlot3D
  • Previous by thread: Re: Desperate help
  • Next by thread: Re: Desperate help