| Author |
Comment/Response |
Michael
|
08/03/12 2:50pm
Does something like this work?
$max = 3;
Fit[data,
Flatten@Table[
SphericalHarmonicY[l, m, \[Theta], \[Phi]] /. {E^x_ :> {Cos[x/I], Sin[x/I]}}, {l, 0, $max}, {m, 0, l}], {\[Theta], \[Phi]}]
How far to take it -- the value of $max -- is a bit of an art, beyond my skill.
URL: , |
|