TimelinePlotにグラフィカルなラベルを加える

映画「ハリーポッター」の公開日を表示する．

In[1]:=

TimelinePlot[ EntityClass["Movie", "HarryPotterFranchise"] -> "ReleaseDate"]

Out[1]=

映画のポスターをラベルとして使い，垂直のライムライン上に古い映画が下になるようにプロットする．

In[2]:=

TimelinePlot[ Rule @@@ EntityValue[ EntityClass["Movie", "HarryPotterFranchise"], {"ReleaseDate", "Image"}], LabelStyle -> 18, PlotLayout -> "ReverseVertical", PlotTheme -> "Business"]

Out[2]=