4D框架下的谢尔宾斯基金字塔（Sierpinski Pyramid）构型

GeoGebra 命令及参数

1. Vector(O, (x(O), y(O), z(O) - (a * sqrt(6) / 3))) → u_{2}
2. Translate(O, u_{2}) → F'
3. OrthogonalPlane(F', zAxis) → p
4. Line(O, F') → f
5. Rotate(A, ((2 * π)) / 3, Line[O, F']) → C
6. Point(Circle[Midpoint[C, A], (Distance[C, A] * sqrt(3) / 2), Segment[C, A]]) → B
7. Tetrahedron(C, A, B) → T_O, tet_{strange}, edgeBC, edgeAC, faceAA'B, faceA'BC, faceAA'C, faceABC, edgeA'B, edgeAA'_{1}, edgeAB, edgeA'C
8. Midpoint(edgeA'B) → D
9. Midpoint(edgeA'C) → E
10. Midpoint(edgeAC) → G
11. Midpoint(edgeBC) → H
12. Midpoint(edgeAB) → I
13. Midpoint(edgeAA'_{1}) → J
14. Segment(H, D) → g
15. Segment(D, E) → h
16. Segment(E, H) → i
17. Segment(H, G) → j
18. Segment(G, E) → k
19. Segment(E, J) → l
20. Segment(J, G) → m
21. Segment(G, I) → n
22. Segment(I, H) → q
23. Segment(I, D) → r
24. Segment(I, J) → s
25. Segment(J, D) → t
26. Segment(D, E) → d
27. Segment(G, H) → e
28. Vector(O, B) → v
29. Translate(l1, v) → T_B
30. Vector(O, A) → u
31. Vector(O, C) → w
32. Translate(A, u) → A_{1}
33. Translate(C, w) → C_1
34. Translate(B, v) → B_1
35. Translate(l1, u) → T_{A}
36. Translate(l1, w) → T_{C}
37. Translate(l1, Vector[(2 * u)]) → T_A_1
38. Translate(l1, Vector[(2 * w)]) → T_{C1}
39. Translate(l1, Vector[(2 * v)]) → T_{B1}
40. Translate(A_{1}, u) → A_{2}
41. Translate(B_1, v) → B_{2}
42. Translate(C_1, w) → C_{2}
43. Translate(l1, Vector[(3 * u)]) → T_{A2}
44. Translate(l1, Vector[(3 * v)]) → T_{B2}
45. Translate(l1, Vector[(3 * w)]) → T_{C2}
46. Translate(T_{C}, Vector[(2 * v)]) → T_{B'2}
47. Translate(T_{C}, Vector[(2 * u)]) → T_{A''2}
48. Translate(T_B, Vector[(2 * w)]) → T_{C''_2}
49. Translate(T_B, Vector[(2 * u)]) → T_{A'2}
50. Translate(T_{A}, Vector[(2 * v)]) → T_{B''2}
51. Translate(l2, Vector[(4 * u)]) → l3
52. Translate(T_{A}, Vector[(2 * w)]) → T_{C'2}