0

From Density plot on the surface of sphere

Manipulate[
  Graphics[{
    RGBColor[
        Abs[SphericalHarmonicY[1, 1, θ, Φ]]^2, 
        Abs[SphericalHarmonicY[1, 0, θ, Φ]]^2, 
        Abs[SphericalHarmonicY[1, -1, θ, Φ]]^2
    ], 
    Disk[]
}], 
{θ, 0, 2 π}, 
{Φ, 0, 2 π}
]
ChrisJJ
  • 608
  • 3
  • 8

1 Answers1

6

The only Φ expression in SphericalHarmonicY[l, m, θ, Φ] is Exp[I m Φ]. By applying Abs to this expression, that turns into: Exp[-Im[m Φ]]. Since m = 1 and Φ is Real, Im[m Φ] is 0, and Exp[-Im[m Φ]] is always 1. Thus, changing Φ would not do anything. The code is functioning correctly.

JungHwan Min
  • 4,664
  • 1
  • 22
  • 36