创建时间轴
使用 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]=
