Create a Timeline
Obtenha uma lista de exemplos de eventos históricos usando EntityValue.
In[1]:=

events = EntityValue["HistoricalEvent", "SampleEntities"]
Out[1]=

Crie um cronograma de vários eventos históricos usando TimelinePlot.
In[2]:=

TimelinePlot[List /@ events, PlotStyle -> AbsoluteThickness[2],
PlotTheme -> "Web", Background -> LightGray,
PlotRange -> {{{-200}, {5000}}, All}]
Out[2]=
