n次单位根 by moebiuscurve

n次单位根 by moebiuscurve
几何画板及绘图内容加载中,请稍等……
2018-12-08 15:01
该范例演示了n次单位根的几何表示。核心数学概念包括复数和单位圆。通过使用GeoGebra命令如Intersect、Circle、Sequence等,可以构造出n次单位根的图形。适合高中数学教学,特别是复数和三角函数的教学。

GeoGebra 命令及参数

  1. Intersect(xAxis, yAxis) → O
  2. Circle(O, 1) → c
  3. Vector(O, Z) → ZVector
  4. Circle(O, Z) → ZCircle
  5. Sequence((Z^(1 / n) * ℯ^((((ί * 2) * π) * k / n))), k, 0, n - 1) → Roots
  6. Circle(O, abs(ZVector)^(1 / n)) → WCircle
  7. Sequence(Text["W_{" + ((k * "}")), Element[Roots, k], n > 0, n > 0], k, 1, n) → RootsLabels
  8. Sequence(Vector[O, Element[Roots, k]], k, 1, n) → RootsVectors
  9. Point(WCircle) → W
  10. Sequence(Circle[O, abs(W^(k))], k, 2, n - 1) → WCircles
  11. Sequence(Vector[O, W^(k)], k, 1, n) → WVectors
  12. Vector(O, (1, 0)) → u
  13. Sequence(Text["W^{" + (k) + "}", W^(k), n > 0, n > 0], k, 2, n) → WLabels
  14. Text("W", W) → textW
  15. Sequence(Text["W^{" + (k) + "}, \angle" + (Angle[u, Vector[W^(k)]]), W^(k), n > 0, n > 0], k, 2, n) → WLabelsAngles
  16. Text("W, ∠" + (Angle[u, Vector[W]]), W) → textWAngles
  17. Text("Z, ∠" + (Angle[u, Vector[Z]]), Z) → textZAngles
  18. Text("Z", Z) → textZ
  19. Sequence(Text["W_{" + ((k * "}, \angle")) + (Angle[u, Vector[Element[Roots, k]]]), Element[Roots, k], n > 0, n > 0], k, 1, n) → RootsLabelsAngles