Visualisez des événements temporels avec TimelinePlot
Par défaut, les chronologies seront alignées sur les groupes d'étiquettes.
In[1]:=

TimelinePlot[(# ->
Show[IconData["MoonPhase", MoonPhase[#]], ImageSize -> 50]) & /@
DateRange[{2016, 1, 1}, {2016, 1, 8}, "Day"], ImageSize -> 400]Out[1]=

Distribuez les étiquettes horizontalement.
In[2]:=

TimelinePlot[(# ->
Show[IconData["MoonPhase", MoonPhase[#]], ImageSize -> 40]) & /@
DateRange[{2016, 1, 1}, {2016, 1, 8}, "Day"],
PlotLayout -> "Grouped"]Out[2]=

L'emplacement des étiquettes s'adapte automatiquement à la disposition de la chronologie.
In[3]:=

TimelinePlot[(# ->
Show[IconData["MoonPhase", MoonPhase[#]], ImageSize -> 50]) & /@
DateRange[{2016, 1, 1}, {2016, 1, 8}, "Day"],
PlotLayout -> "ReverseVertical", ImageSize -> 400, AspectRatio -> 1]Out[3]=
