fallili hat geschrieben:Nur so - nebenbei: Das was Yukterez da zeigt, ist meiner Meinung auch nicht das "Ende der Fahnenstange", weil die Grafik die Kurve aus Sicht des bewegten Beobachters zu verschiedenen Zeitpunkten zeigt. Also wäre da noch eine Animation schön, bei der gezeigt wird was der bewegte Beobachter gleichzeitig sieht.
Das verstehe ich nicht. Dazu musst du nur ein Standbild aus der Animation wählen! Oder meinst du mit berücksichtigten Lichtlaufzeiten? Man kann doch von außen nicht auf die Wellenform eines Photons draufschauen, sonst müsste das Photon während es auf seiner Welle herumkurvt ja selber unentwegt Photonen emittieren...
Was im jeweiligen System gleichzeitig geschieht wurde in in diesem Beitrag: viewtopic.php?p=91918#p91918 gezeigt, im stehenden System ist die grüne Welle manchmal überall gleichzeitig 0, während sie im bewegten System halt nicht gleichzeitig überall 0 ist, was durch die zusätzlichen mit v von rechts nach links wandernden Nullstellen ausgeglichen wird.
Wenn aber die Frage die ist was im bewegten System gleichzeitig mit dem stehenden System geschieht bräuchte man 2 Versionen, denn Gleichzeitigkeit ist bekanntlich relativ. Wenn ich links und rechts gleich lang (T=2π) laufen lasse kann die Animation schön loopen und nach dem Loop von vorn beginnen. Das geht nur so und nicht anders!
fallili hat geschrieben:Ob das dann übersichtlicher wird weiß ich nicht - dann dabei müssten sich ja die Knoten und Bäuche mit v entlang der x Achse bewegen.
Es bewegen sich auch Knoten und Bäuche entlang der x-Achse, am rechten Bild innerhalb von T=2π genau 1π weit nach links was bei v=c/2 genau dem Erwartungswert entspricht. Ich wüsste nicht was ich an dem Code noch ändern könnte, aber wenn dir eine Verbesserung einfällt immer her damit dann kann ich ja mal schaun was heraus kommt. Mein Grundgerüst kann leicht umgebaut werden:
- Code: Alles auswählen
(* Mathematica Syntax, Yukterez *)
(* Settings *)
v = c/2; c = 1; d1 = Sqrt[(c+v)/(c-v)]; d2 = 1/d1; γ = 1/Sqrt[1-v^2/c^2];
(* Stehendes System *)
p1[t_] := Plot[{
Sin[x+t],
Sin[x-t],
Sin[x+t] + Sin[x-t]
}, {x, 0, 4π},
Frame -> True,
PlotRange -> {{0, 4π}, {-2, 2}},
GridLines -> {{π, 2π, 3π}, {}},
PlotStyle -> {Blue, Red, Green},
FrameTicks -> {{{-1, 0, 1}, None}, {{0, π, 2 π, 3 π}, None}}];
(* Bewegtes System *)
p2[t_] := Plot[{
Sin[d1 x+t],
Sin[d2 x-t],
Sin[d1 x+t] + Sin[d2 x-t]
}, {x, 0, 4π/γ},
Frame -> True, PlotRange -> {{0, 4π/γ}, {-2, 2}},
GridLines -> {{π/γ, 2π/γ, 3π/γ}, {}},
PlotStyle -> {Blue, Red, Green},
FrameTicks -> {{{-1, 0, 1}, None}, {{0, N[π/γ, 6], N[2π/γ, 6], N[3π/γ, 6]}, None}}];
(* Plot *)
Manipulate[{p1[t], p2[t]}, {t, 0, 2π}]
Von meinem eigenen Produkt überzeugt,