【微分几何】平面曲线的曲率和曲率圆

电脑

Mathematica

给定曲线{1/23 Cos[t] (5 + 18 Cos[t]), 1/23 (5 + 18 Cos[t]) Sin[t]}，就可以画出在点t=π位置上的曲率圆。

我们可以画出曲率圆圆心的轨迹（见图中粉色曲线）。

动画效果：

{1/2 Cos[t] (1 + Cos[t]), 1/2 (1 + Cos[t]) Sin[t]}的曲率圆圆心轨迹：

{1/2 Cos[t] (1 + Cos[2 t]), 1/2 (1 + Cos[2 t]) Sin[t]}的曲率圆圆心轨迹：

玫瑰线的曲率圆圆心轨迹：

{2/3 Cos[t] (1/2 + Cos[5 t]), 2/3 (1/2 + Cos[5 t]) Sin[t]}：

{1/2 Cos[t] (1 + Cos[5 t]), 1/2 (1 + Cos[5 t]) Sin[t]}