Point Sampling over Regions
Version 11 includes uniform point sampling over regions and reconstruction of surfaces from points.
The Stanford bunny.
In[1]:=
mesh = ExampleData[{"Geometry3D", "StanfordBunny"}, "Region"];
In[2]:=
MeshCellCount[mesh]
Out[2]=
Downsample the mesh.
In[3]:=
pointcloud = RandomPoint[mesh, 10000];
In[4]:=
Graphics3D[{PointSize[Small], Point[pointcloud]}]
Out[4]=
Reconstruct a smaller surface from points.
In[5]:=
ListSurfacePlot3D[pointcloud, MaxPlotPoints -> 40, Axes -> None,
Boxed -> False, Mesh -> None]
Out[5]=
In[6]:=
ListSurfacePlot3D[pointcloud, MaxPlotPoints -> 40, Axes -> None,
Boxed -> False, Mesh -> None];
MeshCellCount[DiscretizeGraphics[%]]
Out[6]=