Museum of Modern Art Holdings and Artists

Source Notebook

Holdings and artists of The Museum of Modern Art

(2 entity types, 129988 entities, 34 properties)

Examples

Basic Examples (4) 

View the data:

In[1]:=
ResourceData[\!\(\*
TagBox["\"\<Museum of Modern Art Holdings and Artists\>\"",
#& ,
BoxID -> "ResourceTag-Museum of Modern Art Holdings and Artists-Input",
AutoDelete->True]\)]
Out[1]=

Register the EntityStore:

In[2]:=
EntityRegister[ResourceData[\!\(\*
TagBox["\"\<Museum of Modern Art Holdings and Artists\>\"",
#& ,
BoxID -> "ResourceTag-Museum of Modern Art Holdings and Artists-Input",
AutoDelete->True]\)]]
Out[2]=

Retrieve random entities:

In[3]:=
RandomEntity[#, 5] & /@ {"MoMAHolding", "MoMAArtist"}
Out[3]=

View a list of properties:

In[4]:=
EntityProperties /@ {"MoMAHolding", "MoMAArtist"}
Out[4]=

Visualization (2) 

Make a date histogram of the completion dates of all works at MoMA:

In[5]:=
EntityRegister[ResourceData[\!\(\*
TagBox["\"\<Museum of Modern Art Holdings and Artists\>\"",
#& ,
BoxID -> "ResourceTag-Museum of Modern Art Holdings and Artists-Input",
AutoDelete->True]\)]];
DateHistogram[
 DeleteMissing[EntityValue["MoMAHolding", "CompletionDate"]]]
Out[5]=

Plot histograms of painting aspect ratios and areas:

In[6]:=
Table[Histogram[
  EntityValue[
   EntityClass[
    "MoMAHolding", {EntityProperty["MoMAHolding", "Classification"] ->
       "Painting"}], prop], PlotLabel -> prop], {prop, {EntityProperty["MoMAHolding", "AspectRatio"], EntityProperty["MoMAHolding", "Area"]}}]
Out[6]=

Wolfram Research, "Museum of Modern Art Holdings and Artists" from the Wolfram Data Repository (2016)   https://doi.org/10.24097/wolfram.79150.data

Data Resource History

Publisher Information