3D model of a tugboat

The Tugboat 3D Model is a model of a type of powerful boat used to tow large vessels in harbors called the tugboat.
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) 

Retrieve the model:

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

Summary properties:

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

Find the minimum volume ball that encapsulates the mesh:

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

View the model with roll, pitch, and yaw rotations:

In[5]:=
Multicolumn[Table[TransformedRegion[ResourceData[\!\(\*
TagBox["\"\<Tugboat\>\"",
#& ,
BoxID -> "ResourceTag-Tugboat-Input",
AutoDelete->True]\)], AffineTransform@RollPitchYawMatrix[{r, 0, 0}, {1, 2, 3}]], {r, 0, 2 Pi, 2 Pi/8}], 3]
Out[5]=

Wolfram Research, "Tugboat" from the Wolfram Data Repository (2022)  

Data Resource History

Data Downloads

Publisher Information