Create a Timeline
Get a list of example historical events using EntityValue.
In[1]:=
events = EntityValue["HistoricalEvent", "SampleEntities"]Out[1]=
Create a timeline of various historical events using TimelinePlot.
In[2]:=
TimelinePlot[List /@ events, PlotStyle -> AbsoluteThickness[2],
PlotTheme -> "Web", Background -> LightGray,
PlotRange -> {{{-200}, {5000}}, All}]Out[2]=
