New answers tagged

8

You can plot the surface and the vector fields separately and then combine them together. Here is an example. Consider the spherical radius r can be written as function $r(\theta,\phi)$: mysurface[θ_, ϕ_] = FullSimplify[Re[SphericalHarmonicY[3, 2, θ, ϕ]], Assumptions -> {θ ∈ Reals, ϕ ∈ Reals}] (* 1/4 Sqrt[105/(2 π)] Cos[θ] Cos[2 ϕ] Sin[θ]^2 *) ...


1

The difficulties here are due exclusively to syntax errors, such as interchanging Set and Equal. If the code is rewritten as, γ = 28; Subscript[μ, 0] = 1.25*10^-6; Subscript[M, 0] = 800*10^-3/Subscript[μ, 0]; Subscript[B, dc] = 200*10^-3; Subscript[B, eff] = {Subscript[B, dc], 0, 0} - Subscript[μ, 0]*Subscript[M, 0] Dot[m[t], {0, 0, 1}]; ...



Top 50 recent answers are included