So, I'm trying (keyword trying) to learn a bit of special relativity on my own via the Stanford lectures on Youtube by Leonard Susskind, but I'm running into a problem.(adsbygoogle = window.adsbygoogle || []).push({});

According to the lectures, for two different reference frames with co-ordinates marked (x, t) and (x', t'), the latter moving, x' = x cosh(ω) - t sinh(ω), and t' = t cosh(ω) - x sinh(ω). (The velocity of the moving reference frame is sinh(ω)/cosh(ω). c = 1.). I've tried to graph this in Mathematica as an animation with omega (and thus velocity) increasing per frame.

Here is my code:

List1 = {};

List2 = {};

For[ω = 0, ω <= 1, ω = ω + 0.1,

For[x = -5, x <= 5, ++x,

For[t = -5, t <= 5, ++t,

AppendTo[

List1, {x Cosh[ω] - t Sinh[ω], -x Sinh[ω] +

t Cosh[ω]}]]]; AppendTo[List2, List1]; List1 = {}]

Animate[ListPlot[Part[List2, n]], {n, 1, 11, 1}]

The problem is, what I get is that, over time, the square turns into a gradually thinner parallelogram-like shape, but the "further" vertices are in the top left and lower right quadrants. According to the Wolfram Demonstrations Project, they should be in the top right and lower left quadrants. What did I do wrong?

**Physics Forums - The Fusion of Science and Community**

The friendliest, high quality science and math community on the planet! Everyone who loves science is here!

# Lorentz Transformation in Mathematica appears wrong.

Loading...

Similar Threads - Lorentz Transformation Mathematica | Date |
---|---|

Matlab Plotting Coordinate Transformations in Matlab | Feb 12, 2018 |

Reconstruction of the Fourier transform from its parts | Sep 8, 2016 |

Matlab Trying to compute Hilbert transform numerically | Jul 31, 2016 |

DSolve; Lorentz Force equations of motion | Nov 18, 2008 |

Lorentz Transformations Help Mathematica | Aug 2, 2004 |

**Physics Forums - The Fusion of Science and Community**