Wolfram Language

Cálculo simbólico e numérico

Resolva uma equação integral de Volterra

Resolva uma equação integral de Volterra usando DSolveValue.

In[1]:=
Click for copyable input
eqn = y[x] == x^3 + \[Lambda] \!\( \*SubsuperscriptBox[\(\[Integral]\), \(0\), \(x\)]\(\((t - \ x)\) y[ t] \[DifferentialD]t\)\);
In[2]:=
Click for copyable input
sol = DSolveValue[eqn, y[x], x]
Out[2]=

Faça um gráfico da solução para diferentes valores de λ.

In[3]:=
Click for copyable input
Plot[Table[sol, {\[Lambda], 1, 3, 0.5}] // Evaluate, {x, 0, 20}]
Out[3]=

Resolva uma equação integral de Volterra debilmente singular.

In[4]:=
Click for copyable input
eqn = y[x] == x^a - \!\( \*SubsuperscriptBox[\(\[Integral]\), \(0\), \(x\)]\( \*FractionBox[\(y[t]\), SqrtBox[\(x - t\)]] \[DifferentialD]t\)\);

Use DSolveValue para obter uma expressão para a solução.

In[5]:=
Click for copyable input
sol = DSolveValue[eqn, y[x], x]
Out[5]=

Faça um gráfico da solução.

In[6]:=
Click for copyable input
Plot[Table[sol, {a, 1, 4, 0.7}] // Evaluate, {x, 0, 2}]
Out[6]=

Exemplos Relacionados

de en es fr ja ko ru zh