Trouvez les valeurs propres qui se situent dans un intervalle
Spécifiez une région.
In[1]:=

\[CapitalOmega] =
ImplicitRegion[(x^2 + y^2 + 2 y)^2 < 4 (x^2 + y^2), {x, y}];
Spécifiez un opérateur Laplacien.
In[2]:=

\[ScriptCapitalL] = -Laplacian[u[x, y], {x, y}];
Spécifiez une condition aux limites de Dirichlet.
In[3]:=

\[ScriptCapitalB] = DirichletCondition[u[x, y] == 0, True];
Trouvez une valeur propre dans un intervalle particulier et la fonction propre correspondante à l'aide d'un maillage raffiné.
In[4]:=

{vals, funs} =
NDEigensystem[{\[ScriptCapitalL], \[ScriptCapitalB]},
u, {x, y} \[Element] \[CapitalOmega], 1,
Method -> {"Eigensystem" -> {"FEAST", "Interval" -> {400, 405}},
"SpatialDiscretization" -> {"FiniteElement",
"MeshOptions" -> {"MaxCellMeasure" -> 0.001}}}]
Out[4]=

Visualisez la fonction propre trouvée.
Afficher l'entrée complète de Wolfram Language
Out[5]=
