Drawing a T-Rex with Fourier Transform

Drawing a T-Rex with Fourier Transform
Loading the math board and drawing, please wait…
2018-12-26 14:09
This example demonstrates how to draw a T-Rex using the Discrete Fourier Transform, involving core math concepts like Complex Numbers, Coordinate Geometry, Sequences, and Transformations. Key GeoGebra commands and objects used include Sequence, Reverse, Zip, First, Join, Last, PolyLine, Sum, and CurveCartesian, making it suitable for high school and above learners exploring the application of DFT.

GeoGebra Commands & Parameters

  1. Sequence(N) → LN
  2. Reverse(Sort[Zip[(abs(F), n), F, LF, n, LN]]) → LAs
  3. Zip(y(As), As, LAs) → Lj
  4. Sequence(1, M) → Lm
  5. First(Zip[Element[Lk, j], j, Lj], M) → Lks
  6. First(Zip[Element[LF, j], j, Lj], M) → LFs
  7. First(Zip[x(As), As, LAs], M) → LRs
  8. Zip(Sum[Zip[(abs(F); arg(F) + (k * t)), F, First[LFs, m], k, Lks]], m, Lm) → LC1
  9. Join({{(0, 0)}, LC1}) → LC
  10. Last(LC) → Plast
  11. PolyLine(LC) → PolyL
  12. Zip(Circle[Element[LC, m], R], m, Lm, R, LRs) → Epicycles
  13. Sum(Zip[(x(F) * cos((k * x))) - (y(F) * sin((k * x))), F, LFs, k, Lks]) → fx
  14. Sum(Zip[(x(F) * sin((k * x))) + (y(F) * cos((k * x))), F, LFs, k, Lks]) → fy
  15. CurveCartesian(fx(t), fy(t), t, 0, (2 * π)) → orbit

AI Drawing Prompt Reference

Draw a T-Rex using Fourier Transform by sorting and reversing complex number points, combining them with frequency coefficients, creating overlapping circular motion paths, and finally plotting the full trajectory formed by sine and cosine functions.
The prompt above was compiled from the original drawing commands and is for reference only.