Wolfram Data Repository

Immediate Computable Access to Curated Contributed Data

Gantry Crane Model

Source Notebook

Model of a gantry crane

Examples

Basic Examples (4) 

Retrieve the model:

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

The icon:

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

The annotation:

In[3]:=
ResourceData[\!\(\* TagBox["\"\<Gantry Crane Model\>\"", #& , BoxID -> "ResourceTag-Gantry Crane Model-Input", AutoDelete->True]\), "Annotation"]
Out[3]=

The transfer-function model:

In[4]:=
ResourceData[\!\(\* TagBox["\"\<Gantry Crane Model\>\"", #& , BoxID -> "ResourceTag-Gantry Crane Model-Input", AutoDelete->True]\), "TransferFunctionModel"]
Out[4]=

Scope & Additional Elements (3) 

Available content elements:

In[5]:=
\!\(\* TagBox[ RowBox[{"ResourceObject", "[", "\"\<Gantry Crane Model\>\"", "]"}], #& , BoxID -> "ResourceTag-Gantry Crane Model-Input", AutoDelete->True]\)["ContentElements"]
Out[5]=

The available model types:

In[6]:=
ResourceData[\!\(\* TagBox["\"\<Gantry Crane Model\>\"", #& , BoxID -> "ResourceTag-Gantry Crane Model-Input", AutoDelete->True]\), "AvailableModelTypes"]
Out[6]=

The parameters:

In[7]:=
ResourceData[\!\(\* TagBox["\"\<Gantry Crane Model\>\"", #& , BoxID -> "ResourceTag-Gantry Crane Model-Input", AutoDelete->True]\), "Parameters"]
Out[7]=

Visualizations (1) 

The crane's response to a perturbation:

In[8]:=
OutputResponse[ResourceData[\!\(\* TagBox["\"\<Gantry Crane Model\>\"", #& , BoxID -> "ResourceTag-Gantry Crane Model-Input", AutoDelete->True]\)], {0, 0, 100 UnitBox[t/3 - 1], 80 UnitBox[t/3 - 1]}, {t, 0, 20}]; Table[Plot[\[ScriptO]\[ScriptR][[1]], {t, 0, 15}, Sequence[ PlotLabel -> Part[\[ScriptO]\[ScriptR], 2], PlotRange -> All, ImageSize -> Small]], {\[ScriptO]\[ScriptR], ({%, {Subscript[\[Theta], 11], Subscript[\[Theta], 12], Subscript[\[Theta], 21], Subscript[\[Theta], 22]}}\[Transpose])}]
Out[9]=

Analysis (2) 

Obtain a discrete-time model:

In[10]:=
ToDiscreteTimeModel[ResourceData[\!\(\* TagBox["\"\<Gantry Crane Model\>\"", #& , BoxID -> "ResourceTag-Gantry Crane Model-Input", AutoDelete->True]\)], 0.5]
Out[10]=

It's observable:

In[11]:=
ObservableModelQ[%]
Out[11]=

Suba Thomas, "Gantry Crane Model" from the Wolfram Data Repository (2025)  

Data Resource History

  • Date Created:

Source Metadata

  • Citation:
    • W. O'Connor and H. Habibi, "Gantry crane control of a double-pendulum distributed-mass load using mechanical wave concepts," Mechanical Sciences, vol. 4, no. 2, pp. 251–261, Jul. 2013.

Publisher Information

  • Prepared for the Wolfram Data Repository By: Maher Kuzbari, Suba Thomas
  • Publisher of Record: Suba Thomas