Ondas: tiempo y espacio
De luz-wiki
La propagación en tiempo y espacio
La imagen se generó con la siguiente instrucción de mathematica
Export["g-pulse-prop.gif", Table[Plot[Re[pulgauss[t, z]], {z, -5, 5}, PlotRange -> {-1, 1}, AxesLabel -> {"z", pert}, PlotLabel -> "s" t], {t, -2, 4, .1}] ]
donde
pulgauss[t_, z_, Error al representar (error de sintaxis): {\displaystyle \[Omega]} _: 2 \[Pi], k_: 3 \[Pi], \[Sigma]_: 10] := Exp[ \[ImaginaryI] (k z - \[Omega] t ) - (k z - \[Omega] t )^2/\ \[Sigma]^2]
--Mfg 19:12 12 oct 2007 (CDT)
Imagen procesada con gimp es un poco menor en tamaño pero todavía muy grande
--Mfg 19:22 12 oct 2007 (CDT)
versión de imágenes fijas y luego unidas
--Mfg 19:28 12 oct 2007 (CDT)