【微分几何】怎么绘制扁椭球面

时间:2024-10-12 19:32:28

1、给出一个具体的扁椭球:x^2/a^2+y^2/b^2陴鲰芹茯+z^2/c^2=1Mathematica可以直接用隐函数作图:ContourPlot3D[Evaluate[x^2/a^2 + y炷翁壳唏^2/b^2 + z^2/c^2 == 1 /. {a -> 5, b -> 4, c -> 3}], {x, -5, 5}, {y, -5, 5}, {z, -5, 5}, AspectRatio -> Automatic]

【微分几何】怎么绘制扁椭球面

2、注意到,扁椭球可以通过球面仿射变换而得到,因此可以给出参数方程的作图方法:ParametricPlot3D[{5 Sin[u柯计瓤绘] Sin[v], 4 Cos[v] Sin[u], 3 Cos[u]},{u, 0, 2 Pi}, {v, 0, Pi}]

【微分几何】怎么绘制扁椭球面

3、隐函数作图,没有明显的极化现象。上一个动态图,全面查看这个图形。

【微分几何】怎么绘制扁椭球面

4、而参数方程作图,则出现明显的极化,经纬线分明。经线的集束点,就是极点。

【微分几何】怎么绘制扁椭球面

5、需要注意的是,扁椭球上面两点之间的短程线,不一定是平面曲线。

【微分几何】怎么绘制扁椭球面

6、延长这条短程线,可以明显发现这不是一条平面曲线,看起来更像是扁椭球上面的缠绕线。

【微分几何】怎么绘制扁椭球面
© 手抄报圈