螺旋转分立方体
几何画板及绘图内容加载中,请稍等……
①本范例演示了通过螺旋转动将立方体沿中位线对半分割的几何现象;②涉及的核心数学概念包括立体几何、旋转变换、中位线、二次函数及超几何分布;③作图要点——从下方『构造摘要』提炼用到了 Point(点)、Cube(立方体)、CurveCartesian(笛卡尔曲线)、Rotate(旋转)、Surface(曲面)、Translate(平移)、Polygon(多边形)等 GeoGebra 命令/对象;④适合高中及以上学段学习空间几何、变换及概率统计的学生,也可用于数学教学演示。
GeoGebra 命令及参数
Point(Circle[B, Distance[A, B], Segment[A, B]]) → CCube(A, B, C) → a, D, faceCDHG, faceEFGH, edgeAD, edgeAB, edgeBC, edgeCD, edgeAE, edgeDH, edgeEH, edgeEF, E, edgeBF, edgeFG, edgeCG, edgeGH, F, G, H, faceABCD, faceADHE, faceABFE, faceBCGFCurveCartesian(1, tan(t - π / 4), (4 * t / π), t, 0, π / 2) → eRotate(e, π) → fSurface((u * cos(t - π / 4)), (u * sin(t - π / 4)), (4 * t / π), t, 0, π / 2, u, -2, 2) → bSurface((u * x(e(t))) + ((1 - u) * x(f(t))), (u * y(e(t))) + ((1 - u) * y(f(t))), (u * z(e(t))) + ((1 - u) * z(f(t))), t, 0, π / 2, u, 0, 1) → dTranslate(Rotate[d, n, zAxis], Vector[(0, 0, (4 * n / π))]) → gTranslate(Rotate[Polygon[E, F, G], n, zAxis], Vector[(0, 0, (4 * n / π))]) → t1Translate(Rotate[Polygon[D, A, B], n, zAxis], Vector[(0, 0, (4 * n / π))]) → t2Translate(Rotate[Polygon[A, B, F, E], n, zAxis], Vector[(0, 0, (4 * n / π))]) → q1Translate(Rotate[Surface[1, (-u) + ((1 - u) * y(e(t))), (2 * u) + ((1 - u) * z(e(t))), t, 0, π / 2, u, 0, 1], n, zAxis], Vector[(0, 0, (4 * n / π))]) → hSurface(-1, (-u) + ((1 - u) * y(f(t))), ((1 - u) * z(f(t))), t, 0, π / 2, u, 0, 1) → iTranslate(Rotate[i, n, zAxis], Vector[(0, 0, (4 * n / π))]) → jSurface(1, (u * y(e(t))) + (1 - u), (u * z(e(t))), t, 0, π / 2, u, 0, 1) → kSurface(-1, (u * y(f(t))) + (1 - u), (u * z(f(t))) + ((1 - u) * 2), t, 0, π / 2, u, 0, 1) → lPolygon(E, H, G) → t3, g_1, e_1, h_1Polygon(B, C, D) → t4, d_1, b_1, c_1Polygon(C, D, H, G) → q2, c_2, d_2, h_2, g_2