Sample 3D Model: Suzanne

Source Notebook

3D model of a chimpanzee head

Details

The Suzanne 3D model is a stylized model of a chimpanzee head. It was first included in the Blender modeling software in 2002 as an alternative to more common test models.
The original model consisted of 500 polygons, many of which were not coplanar. These polygons have been triangulated to create a mesh of 968 triangles.
Additional content elements include:
“Description"description
“LongDescription"long description
“Name"English name
StandardName"standard English name
"MeshRegion"mesh region representation
"Region"region representation
"PolygonCount"number of polygons
"VertexCount"number of vertices
"ConnectedComponents"number of connected components
"BoundingBox"bounding box
"Summary"summary information

Examples

Basic Examples (2) 

In[1]:=
ResourceData[\!\(\*
TagBox["\"\<Sample 3D Model: Suzanne\>\"",
#& ,
BoxID -> "ResourceTag-Sample 3D Model: Suzanne-Input",
AutoDelete->True]\)]
Out[1]=

In[2]:=
ResourceData[\!\(\*
TagBox["\"\<Sample 3D Model: Suzanne\>\"",
#& ,
BoxID -> "ResourceTag-Sample 3D Model: Suzanne-Input",
AutoDelete->True]\), "Summary"]
Out[2]=

Scope & Additional Elements (1) 

Find the minimum volume ball that encapsulates the mesh:

In[3]:=
bound = BoundingRegion[ResourceData[\!\(\*
TagBox["\"\<Sample 3D Model: Suzanne\>\"",
#& ,
BoxID -> "ResourceTag-Sample 3D Model: Suzanne-Input",
AutoDelete->True]\)], "MinBall"]
Out[3]=
In[4]:=
Show[{ResourceData[\!\(\*
TagBox["\"\<Sample 3D Model: Suzanne\>\"",
#& ,
BoxID -> "ResourceTag-Sample 3D Model: Suzanne-Input",
AutoDelete->True]\)], Graphics3D[{Opacity[0.5], bound}]}]
Out[4]=

Alec Shedelbower, "Sample 3D Model: Suzanne" from the Wolfram Data Repository (2022)  

Data Resource History

Source Metadata

Publisher Information