タイムラインの作成
EntityValueを使って歴史的な出来事の例のリストを得る.
In[1]:=

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

TimelinePlotを使ってさまざまな歴史的出来事のタイムラインを作成する.
In[2]:=

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