1、准备一组三维数据。这里面有1323个三维数据点。data // Dimensions
2、绘制这些点:ListPointPlot3D
3、拟合出一个曲面:ListPlot3D
4、在曲面上绘制这些点:Show
5、从一个封闭曲面上取一些点:data = Flatten[ Table[{Sin[u], Cos[u + v], Sin[v]}, {u, 0, 2 \[Pi], .2}, {v, 0, 2 \[Pi], .2}], 1];绘制散点图。
6、要想拟合出这个封闭的曲面,ListPlot3D行不通。
7、ListSurfacePlot3D也不完美。
8、没找到好的拟合方案,只能直接绘制参数方程的曲面了。
9、在曲面上绘制散点图。