等边三角形阵列变换

GeoGebra 命令及参数

1. Polygon(A, B, C) → poly1, c, a, b
2. Polygon(A, B, 3) → poly4, d, e, f, D
3. Circle(B, A, D) → g
4. Center(g) → E
5. Rotate(A, 120*°, E) → A'
6. Rotate(B, 120*°, E) → B'
7. Rotate(C, 120*°, E) → C'
8. Polygon(A', B', C') → poly2, c', a', b'
9. Rotate(A, 240*°, E) → A'_1
10. Rotate(B, 240*°, E) → B'_1
11. Rotate(C, 240*°, E) → C'_1
12. Polygon(A'_1, B'_1, C'_1) → poly3, c'_1, a'_1, b'_1
13. Vector(C, D) → u
14. Rotate(u, 60*°, C) → v
15. Polygon(C, B, C', D, C'_1, A) → poly5, c_1, b_1, c'_2, d_1, c'_3, a_1
16. Sequence(Translate[Sequence[Polygon[Translate[C, Vector[(n * u)]], Translate[B, Vector[(n * u)]], Translate[C', Vector[(n * u)]], Translate[D, Vector[(n * u)]], Translate[C'_1, Vector[(n * u)]], Translate[A, Vector[(n * u)]]], n, -10, 10], Vector[(m * v)]], m, -10, 10) → list1
17. Sequence(Translate[Sequence[Translate[poly4, Vector[(n * u)]], n, -10, 10], Vector[(m * v)]], m, -10, 10) → list2