5 votos

Transformada inversa de Laplace de 1λcosh(as+bs)+(1λ)cosh(asbs) .

Estoy tratando de encontrar la transformada inversa de Laplace de alguna función de la forma

F(s)=1λcosh(as+bs)+(1λ)cosh(asbs),

donde λ[0,1] . He intentado utilizar el teorema del residuo, sin embargo, encontrar los polos ( raíces del denominador ) parece bastante complicado, lo que no he averiguado, todavía.

También he intentado calcular la integral: σiσ+iF(s)estds, utilizando alguna sustitución de la forma u=es Sin embargo, se obtiene otra forma complicada a partir de la cual puedo continuar.

Se agradece cualquier idea, pista o solución parcial.

1 votos

¿Qué hace σ+i ¿quieres decir?

0 votos

¡¡¡Incómodo!!!.

0 votos

@Chase Ryan Taylor. Para una referencia rápida, vea esto staff.city.ac.uk/~george1/laplace_residue.pdf .

2voto

Cesar Eo Puntos 61

En cuanto a los ceros de

λcosh(as+bs)+(1λ)cosh(asbs)=0

haciendo s=x+iy y tomando las partes real e imaginaria

R=λcos((a+b)x2+y24sin(12arg(x+iy)))cosh((a+b)x2+y24cos(12arg(x+iy)))(λ1)cos((ab)x2+y24sin(12arg(x+iy)))cosh((ab)x2+y24cos(12arg(x+iy)))=0I=λsin((a+b)x2+y24sin(12arg(x+iy)))sinh((a+b)x2+y24cos(12arg(x+iy)))(λ1)sin((ab)x2+y24sin(12arg(x+iy)))sinh((ab)x2+y24cos(12arg(x+iy)))=0

y analizando el locus raíz para algunos valores de a,b,λ tenemos buena información.

Por ejemplo, con a=3,b=2,λ=0.9 sin ceros.

enter image description here

con a=3,b=2,λ=0.1 los ceros están en las intersecciones.

enter image description here

con a=3,b=2,λ=0.5 sin ceros.

enter image description here

Así podemos visualizar la posición de los ceros en función de los parámetros. Esto puede ayudar con el método de los residuos. Sigue el MATHEMATICA script para hacer los gráficos

re0 = -(-1 + lambda) Cos[(Sqrt[a] - Sqrt[b]) (x^2 + y^2)^(1/4)
 Sin[1/2 Arg[x + I y]]] Cosh[(Sqrt[a] - Sqrt[b]) (x^2 + y^2)^(1/4)
 Cos[1/2 Arg[x + I y]]] + lambda Cos[(Sqrt[a] + Sqrt[b]) (x^2 + y^2)^(1/4)
 Sin[1/2 Arg[x + I y]]] Cosh[(Sqrt[a] + Sqrt[b]) (x^2 + y^2)^(1/4)
 Cos[1/2 Arg[x + I y]]]
im0 = -(-1 + lambda) Sin[(Sqrt[a] - Sqrt[b]) (x^2 + y^2)^(1/4)
 Sin[1/2 Arg[x + I y]]] Sinh[(Sqrt[a] - Sqrt[b]) (x^2 + y^2)^(1/4)
 Cos[1/2 Arg[x + I y]]] + lambda Sin[(Sqrt[a] + Sqrt[b]) (x^2 + y^2)^(1/4)
 Sin[1/2 Arg[x + I y]]] Sinh[(Sqrt[a] + Sqrt[b]) (x^2 + y^2)^(1/4)
 Cos[1/2 Arg[x + I y]]]

a = 3;
b = 2;
lambda = 0.1;
r = 50;
gr1 = ContourPlot[re0 == 0, {x, -r, r}, {y, -r, r}, ContourStyle -> Red, PlotPoints -> 25];
gr2 = ContourPlot[im0 == 0, {x, -r, r}, {y, -r, r}, ContourStyle -> Blue, PlotPoints -> 25];
Show[gr1, gr2]

0 votos

Qué bien, ¡gracias! También tenía algunos valores para los que no había ceros, así que, después de eso, volveré a revisar el método de los residuos.

2 votos

@ Introdujo el MATHEMATICA script en caso de que pueda ser útil.

0 votos

Muchas gracias, me has ahorrado mucho tiempo.

i-Ciencias.com

I-Ciencias es una comunidad de estudiantes y amantes de la ciencia en la que puedes resolver tus problemas y dudas.
Puedes consultar las preguntas de otros usuarios, hacer tus propias preguntas o resolver las de los demás.

Powered by:

X