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

Re: SphericalPlot3D

• To: mathgroup at smc.vnet.net
• Subject: [mg72080] Re: SphericalPlot3D
• From: Jean-Marc Gulliet <jeanmarc.gulliet at gmail.com>
• Date: Mon, 11 Dec 2006 04:54:57 -0500 (EST)
• Organization: The Open University, Milton Keynes, UK
• References: <ele64l$rim$1@smc.vnet.net>

thomas.rausch wrote:
> Hi,
> 
> I use mathematica versin 5.0
> I try a visualisation of spherical Harmonics:
> 
> << Graphics`
> SphericalPlot3D[(Abs[SphericalHarmonicY[3, 0, the, phi]])^2 ,
>   {the, 0, Pi}, {phi, 0, 2Pi},
>   PlotPoints ->  50, PlotRange ->  All];
> 
> I get a very small figure.
> How can I get a bigger output?
> 
> Many Thanks
> Thomas Rausch
> 

Hi Thomas,

It seems that Mathematica is slightly disturbed by the option
PlotRange->All. (You can compare the graph returned by the same
expression but without the option PlotRange.) Anyway, you can easily
adjust the size of the graph by setting the option ImageSize to whatever
value(s) is/are fitting your needs. For instance,

Needs["Graphics`ParametricPlot3D`"]
SphericalPlot3D[(Abs[SphericalHarmonicY[3, 0, the, phi]])^2,
{the, 0, Pi}, {phi, 0, 2Pi}, PlotPoints -> 50, PlotRange -> All,
ImageSize -> 500];

Regards,
Jean-Marc