En cuanto a los ceros de
λcosh(√as+√bs)+(1−λ)cosh(√as−√bs)=0
haciendo s=x+iy y tomando las partes real e imaginaria
R=λcos((√a+√b)4√x2+y2sin(12arg(x+iy)))cosh((√a+√b)4√x2+y2cos(12arg(x+iy)))−(λ−1)cos((√a−√b)4√x2+y2sin(12arg(x+iy)))cosh((√a−√b)4√x2+y2cos(12arg(x+iy)))=0I=λsin((√a+√b)4√x2+y2sin(12arg(x+iy)))sinh((√a+√b)4√x2+y2cos(12arg(x+iy)))−(λ−1)sin((√a−√b)4√x2+y2sin(12arg(x+iy)))sinh((√a−√b)4√x2+y2cos(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]
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 .