平面曲线的曲率圆的圆心位于法向量上，而三维空间里面的曲线，曲率圆圆心位于谠骀魍埭主法向量上，曲率圆位于密切平面上。本文，就用Mathematica来绘制空间曲线的曲率圆。
工具/原料
电脑
Mathematica
方法/步骤
1、曲线r[t_]:={Cos[2t],3Sin[2t],2Cos[t]};
2、计算曲率，Mathematica有内置命令：
3、绘制密切圆的自定义函数如下图：
4、画出t=0点的密切圆（也就是曲率圆）：miqie[0]
5、t=1点的密切圆：miqie[1]
6、曲线上密切圆的动态图：Manipulate[miqie[n],{n,0,2Pi}]
