Wolfram mathematica 在mathematica中生成双三次椭球体

Wolfram mathematica 在mathematica中生成双三次椭球体,wolfram-mathematica,ellipse,Wolfram Mathematica,Ellipse,我需要生成一个双三次椭球,我试着在mathematica中建立椭球的参数方程 ParametricPlot3D[{4 Sin[u] Cos[v], 3 Sin[u] Sin[v], 2 Cos[u]}, {u, 0, Pi}, {v, 0, 2 Pi}, Mesh -> False, Background -> Black, Boxed -> False, Axes -> False] 我的问题是,因为我需要一个双三次曲面,我想把这个参数图限制在16个点,我不知道如何

我需要生成一个双三次椭球,我试着在mathematica中建立椭球的参数方程

ParametricPlot3D[{4 Sin[u] Cos[v], 3 Sin[u] Sin[v], 2 Cos[u]}, {u, 0,
Pi}, {v, 0, 2 Pi}, Mesh -> False, Background -> Black, 
Boxed -> False, Axes -> False]

我的问题是,因为我需要一个双三次曲面,我想把这个参数图限制在16个点,我不知道如何使mathematica样本只包含我需要的点数。我是mathematica和几何建模的新手

你只想要分数吗?如果是这样的话,那么可能是这样的:Graphics3D[Map[Point,Union[Flatten[Table[{4sin[u]Cos[v],3sin[u]Sin[v],2cos[u]},{u,0,Pi,Pi/3},{v,0,2pi,Pi/3},1]]如果你想要更多的话,也许一个更详细的解释会有所帮助。谢谢@Bill,这就是我想要的。但这只生成14个点,而我正在寻找一种方法来生成补丁所需的16个控制点。对每个迭代器使用小于Pi/3的值将获得更多的点。Pi/3和Pi/4会给你18分,或者Pi/6和Pi/6会给你62分。我猜不出你到底需要什么。也许表[{4 Sin[u]Cos[v],3 Sin[u]Sin[v],2 Cos[u]},{u,0,Pi/4,Pi/4},{v,0,2 Pi/2,Pi/2}给你16分,但其中一些分数是一样的。谢谢@Bill。我能够根据您的帮助找出如何生成我需要的分数。