Wolfram Language

Sistemas propios diferenciales

Analice un operador de SturmLiouville con potencial asimétrico

Encuentre los cinco valores propios y funciones propias periódicos más pequeños de un operador de SturmLiouville.

Especifique un operador de SturmLiouville.

In[1]:=
Click for copyable input
V[x_] := Cos[x] + x; \[ScriptCapitalL] = -u''[x] - (V''[x] - V'[x]^2) u[x];

Especifique una condición de límite periódica.

In[2]:=
Click for copyable input
\[ScriptCapitalB] = u[0] == u[2 \[Pi]];

Encuentre los cinco valores propios y funciones propias más pequeños.

In[3]:=
Click for copyable input
{vals, funs} = NDEigensystem[{\[ScriptCapitalL], \[ScriptCapitalB]}, u[x], {x, 0, 2 \[Pi]}, 5];

Inspeccione los valores propios.

In[4]:=
Click for copyable input
vals
Out[4]=

Visualice las funciones propias.

In[5]:=
Click for copyable input
Plot[funs, {x, 0, 2 \[Pi]}]
Out[5]=

Ejemplos relacionados

de en fr ja ko pt-br ru zh