Encontre valores próprios que se encontram em um intervalo
Especifique uma região.
In[1]:=
![Click for copyable input](assets.pt-br/find-eigenvalues-that-lie-in-an-interval/In_56.png)
\[CapitalOmega] =
ImplicitRegion[(x^2 + y^2 + 2 y)^2 < 4 (x^2 + y^2), {x, y}];
Especifique um operador laplaciano.
In[2]:=
![Click for copyable input](assets.pt-br/find-eigenvalues-that-lie-in-an-interval/In_57.png)
\[ScriptCapitalL] = -Laplacian[u[x, y], {x, y}];
Especifique uma condição de contorno de Dirichlet.
In[3]:=
![Click for copyable input](assets.pt-br/find-eigenvalues-that-lie-in-an-interval/In_58.png)
\[ScriptCapitalB] = DirichletCondition[u[x, y] == 0, True];
Encontre um valor próprio em um determinado intervalo e sua correspondente função própria utilizando uma malha refinada.
In[4]:=
![Click for copyable input](assets.pt-br/find-eigenvalues-that-lie-in-an-interval/In_59.png)
{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]=
![](assets.pt-br/find-eigenvalues-that-lie-in-an-interval/O_26.png)
Visualize a função própria encontrada.
mostre o input completo da Wolfram Language
Out[5]=
![](assets.pt-br/find-eigenvalues-that-lie-in-an-interval/O_27.png)