Dilation Stars: A Symmetric Math Art Pattern Based on Scaling Transformations

Dilation Stars: A Symmetric Math Art Pattern Based on Scaling Transformations
Loading the math board and drawing, please wait…
2014-03-10 21:34
In collections Dilation Animations
① This example demonstrates a star-burst-like mathematical art pattern created through dilation (scaling) transformations and symmetric arrangements, producing a visually rhythmic radial design. ② Core mathematical concepts include dilation (homothety), symmetry, coordinate geometry, and sequence generation, with background inspiration from logarithmic functions and indefinite integrals, though the main construction relies on geometric objects. ③ Construction highlights: Using GeoGebra commands such as Circle, Ray, Point, and Sequence, with objects A, B, c, a, C, k, n, and multiple lists (list1, list2, list3, Blist, Clist, list4, list5) and parameter b, the pattern is built by generating sequences of points or shapes, then applying dilation and rotational symmetry to form the star-like arrangement. ④ Suitable for high school and above, this example is ideal for math art projects, teaching geometric transformations, or as a visual demonstration to spark interest in symmetry and scaling.

GeoGebra Commands & Parameters

  1. Circle(A, B) → c
  2. Ray(A, B) → a
  3. Point(a) → C
  4. Sequence(Rotate[B, ((i * 360) * ° / n), A], i, 1, n) → list1
  5. Sequence(Rotate[C, ((i * 360) * ° / n) + (180 * ° / n), A], i, 1, n) → list2
  6. Sequence(Polygon[Element[list1, i], Element[list2, i], Element[list1, If[i ≟ n, 1, i + 1]], A], i, 1, n) → list3
  7. Sequence(Dilate[list1, i, A], i, 1, k) → Blist
  8. Sequence(Dilate[list2, i, A], i, 1, k) → Clist
  9. Sequence(Sequence[Polygon[Element[Element[Blist, j], i], Element[Element[Clist, j], i], Element[Element[Blist, j], If[i ≟ n, 1, i + 1]], Element[Element[Clist, j - 1], i]], i, 1, n], j, 2, k) → list4
  10. Sequence(Sequence[Polygon[Element[Element[Clist, j], i], Element[Element[Blist, j + 1], If[i ≟ n, 1, i + 1]], Element[Element[Clist, j], If[i ≟ n, 1, i + 1]], Element[Element[Blist, j], If[i ≟ n, 1, i + 1]]], i, 1, n], j, 1, k - 1) → list5

AI Drawing Prompt Reference

Create a star-burst mathematical art pattern using dilation and symmetric arrangements, featuring concentric circles, rays, and points, with sequences of shapes generated and transformed by scaling and rotational symmetry to form a radial design.
The prompt above was compiled from the original drawing commands and is for reference only.