二十面体演示

二十面体演示
几何画板及绘图内容加载中,请稍等……
2019-08-12 23:56
①本范例演示了二十面体的几何图形及其12个顶点分布;②涉及的核心数学概念包括多边形、立体几何、向量运算;③作图要点提炼自构造摘要,使用了GeoGebra命令如UnicodeToLetter、Text、Sum、Zip、Sphere、TableText,以及对象如Points00、n、A1-A12、Points3D等;④适合高中及以上学生及数学爱好者用于学习立体几何、向量及三维图形可视化。

GeoGebra 命令及参数

  1. UnicodeToLetter(34) → u34
  2. Text("" + Um1) → txt_p
  3. Sum(Flatten[Sequence[Append[Sequence[Element[txt_p, i], i, m01(k), m02(k)], " "], k, 1, 5]]) → txtUm1
  4. Zip(Vector[a, a + UnitVector[a]], a, Points00) → lVector1
  5. Zip(Vector[a, a + (1.5 * UnitVector[b])], a, Points00, b, Wi_Pc) → lVector2
  6. Zip(Vector[a, a + (1.5 * UnitVector[b])], a, Points00, b, Wi_P) → lVector3
  7. Sphere((0, 0, 0), 5) → sph
  8. Zip(Segment[Element[Points00, y(a)], Element[Points00, z(a)]], a, ll1bb(1)) → ll1
  9. Zip(Segment[Element[Points00, y(a)], Element[Points00, z(a)]], a, ll1bb(2)) → ll2
  10. Zip(Segment[Element[Points00, y(a)], Element[Points00, z(a)]], a, ll1bb(3)) → ll3
  11. TableText(Append["i", 1…n], Append[" \fgcolor{orange}{GM :Δφ_i}, rad", l1w], Append["\fgcolor{magenta}{GC :Δφ_i} , rad", l1cw], "v") → text23r