相关疑难解决方法(0)

这是一组结构化的3D点.现在我们可以形成一个BSpline使用这些点作为结.

dat=Import["3DFoil.mat", "Data"]
fu=BSplineFunction[dat]

在这里,我们可以ParametricPlot3D用这些点来做.

pic=ParametricPlot3D[fu[u,v],{u, 0, 1}, {v, 0, 1}, Mesh -> All, AspectRatio -> 
Automatic,PlotPoints->10,Boxed-> False,Axes-> False]

题

如果我们仔细观察从样条曲线出来的3D几何体,我们可以看到它是一个中空结构.该孔出现在对称轮廓的两侧.我们怎样才能完美地(不是视觉上!)填满这个洞并创建一个统一的Graphics3D物体,在那里两侧的孔被修补.

到目前为止我能得到的是以下内容.孔没有完全修补.

我最近问了太多问题而且我很抱歉.但是,如果你们中的任何一个有兴趣,我希望你能提供帮助

更新

这是belisarius方法的问题.它生成的三角形几乎可以忽略不计.

dat = Import[NotebookDirectory[] <> "/3DFoil.mat", "Data"];
(*With your points in "dat"*)
fd = First@Dimensions@dat;
check = ParametricPlot3D[{BSplineFunction[dat][u, v], 
BSplineFunction[{dat[[1]], Reverse@dat[[1]]}][u, v], 
BSplineFunction[{dat[[fd]], Reverse@dat[[fd]]}][u, v]}, {u, 0, 
1}, {v, 0, 1}, Mesh -> All, AspectRatio -> Automatic, 
PlotPoints -> 10, Boxed -> False, Axes -> False] …