Re: Countur/Density plot on sphere
- To: mathgroup at smc.vnet.net
- Subject: [mg127459] Re: Countur/Density plot on sphere
- From: Bob Hanlon <hanlonr357 at gmail.com>
- Date: Thu, 26 Jul 2012 03:35:05 -0400 (EDT)
- Delivered-to: l-mathgroup@mail-archive0.wolfram.com
- Delivered-to: mathgroup-newout@smc.vnet.net
- Delivered-to: mathgroup-newsend@smc.vnet.net
- References: <20120725063355.F39326866@smc.vnet.net>
This is quite slow but if I understand what you want
f[t_?NumericQ, p_?NumericQ] :=
NIntegrate[(t + x)/(1 + p + x), {x, 0, 1}]
SphericalPlot3D[1, {t, 0, 2 Pi}, {p, 0, Pi},
ColorFunction ->
Function[{x, y, z, t, p, r}, Hue[f[t, p]]],
Mesh -> 10,
MeshFunctions ->
{Function[{x, y, z, t, p, r}, f[t, p]]}]
Bob Hanlon
On Wed, Jul 25, 2012 at 2:33 AM, Bla=C5=BE Kranjc <blaz.kranjc91 at gmail.com> wrote:
> Hello,
> I have a problem in which I need to evaluate a function on the the surface of the sphere. I've used ColorFunction and MeshFunctions before, but they seem to work only on analicial functions, my function is numerical integration in given point and returns a number. Is there any way to plot that kind of graph (colored sphere depending on a value) or can anybody suggest other ways to represent this.
>
> Thank you,
>
> Bla=C5=BE Kranjc
>
- References:
- Countur/Density plot on sphere
- From: BlaÅ Kranjc <blaz.kranjc91@gmail.com>
- Countur/Density plot on sphere