Timeline of Systematic Data & Computable Knowledge

Dataset of nearly 200 notable events in the history of computable knowledge

Originator: Wolfram Research

A timeline prepared for the 2011 Wolfram Data Summit.

Available as a poster and a website.

(6 columns, 186 rows)

Examples

Basic Examples

Retrieve the resource:

In[1]:=
ResourceObject["Timeline of Systematic Data & Computable Knowledge"]
Out[1]=

Retrieve the default content:

In[2]:=
ResourceData["Timeline of Systematic Data & Computable Knowledge"]
Out[2]=

Create a word cloud of regions represented in the timeline:

In[3]:=
WordCloud[
 CommonName[
  DeleteMissing[
   Normal@ResourceData[
      "Timeline of Systematic Data & Computable Knowledge"][All, 
     "Region"]]]]
Out[3]=

Create a word cloud from descriptions of events in the 20th century:

In[4]:=
WordCloud[
 StringRiffle@
  DeleteStopwords@
   Normal[Select[
      ResourceData[
       "Timeline of Systematic Data & Computable Knowledge"], 
      DateObject[{1900}] < #Date < DateObject[{2000}] &][[All, 
     "Description"]]], IgnoreCase -> True]
Out[4]=

Show counts of events by region and century from 2000 B.C. to 2000 A.D.:

In[5]:=
With[{grouped = 
   GroupBy[Select[
      ResourceData[
       "Timeline of Systematic Data & Computable Knowledge"], 
      DateObject[{-2000}] <= #Date <= 
        DateObject[{2000}] &], #Region &][All, All, "Date"]}, 
 DateHistogram[grouped, "Century", ChartLayout -> "Stacked", 
  ChartLegends -> Placed[CommonName@Normal[Keys[grouped]], Bottom]]]
Out[5]=

Show counts of events by region and decade from 1400 to present:

In[6]:=
With[{grouped = 
   GroupBy[Select[
      ResourceData[
       "Timeline of Systematic Data & Computable Knowledge"], 
      DateObject[{1400}] < #Date < Today &], #Region &][All, All, 
    "Date"]}, 
 DateHistogram[grouped, "Decade", ChartLayout -> "Stacked", 
  ChartLegends -> Placed[CommonName@Normal[Keys[grouped]], Bottom]]]
Out[6]=

Generate a timeline plot of events from 1850 to 1900:

In[7]:=
TimelinePlot[
 Select[ResourceData[
    "Timeline of Systematic Data & Computable Knowledge"], 
   DateObject[{1850}] < #Date < DateObject[{1900}] &][
  All, #Date -> Column[{Style[#Title, Bold], #Tagline}] &]]
Out[7]=

Wolfram Research, "Timeline of Systematic Data & Computable Knowledge" from the Wolfram Data Repository. (2017) https://doi.org/10.24097/wolfram.88445.data

Source Metadata