二维费马点的动态构造

二维费马点的动态构造
几何画板及绘图内容加载中,请稍等……
2019-02-24 22:51
这个范例演示了如何使用Weiszfeld迭代法动态构造n边形的费马点。核心数学概念包括几何中点、多边形和迭代算法。使用了命令如Textfield、Sequence、Zip、Polygon等。适合高中数学教学和学习。

GeoGebra 命令及参数

  1. Textfield(r) → InputBox1
  2. UnicodeToLetter(34) → u34
  3. Sequence((x(Corner[1]) + (random() * x(Corner[2] - Corner[1])), y(Corner[1]) + (random() * y(Corner[4] - Corner[1]))), i, 1, n) → Points0
  4. Textfield(n) → InputBox2
  5. Zip(Length[a - F], a, lP) → lseg
  6. Sum(Zip[Length[a - F], a, lP]) → TotalSum
  7. Zip(Segment[A, a], a, lP) → lA
  8. Polygon(lP) → t1
  9. Zip(120° ≤ t ≤ 240°, t, lAngle) → lLog
  10. Sum(lLog) → br
  11. Zip(Rotate[a1, If[b < 180°, (-(60°)), 60°], a2], a1, {P_{2}, P_{1}, P_{1}}, a2, {P_{3}, P_{3}, P_{2}}, b, {lAngle(3), lAngle(1), lAngle(2)}) → lP'
  12. Zip(Center[c], c, lCircle) → Oi
  13. Sequence(Segment[Element[lP', i], Element[lP, i]], i, 1, 3) → lr
  14. If(lLog(2), P_{2}, lLog(3), P_{3}, lLog(1), P_{1}, Intersect[lr(2), lr(1)]) → F_{3Eck}
  15. LaTeX(Text[text7, Atxt]) → text9