Язык Wolfram Language™

Автомаркирующие данные

ListPlot и относящиеся к ней функции теперь поддерживают LabelingFunction.

In[1]:=

SeedRandom[3]; data = Accumulate@Table[RandomInteger[5], 12];

При наличии соответствующих метаданных LabelingFunction автоматически использует свои метки.

In[2]:=

months = {"Jan", "Feb", "Mar", "Apr", "May", "Jun", "Jul", "Aug", "Sep", "Oct", "Nov", "Dec"};

In[3]:=

DateListPlot[data -> months, {2000, 1}, PlotMarkers -> {Automatic, 13}, ImageSize -> 550, Frame -> {{True, False}, {False, False}}, PlotTheme -> {"LargeLabels", "Business"}]

Out[3]=

Используйте Callout в LabelingFunction.

In[4]:=

DateListPlot[data -> months, {2000, 1}, LabelingFunction -> Callout[ Automatic, Automatic], PlotMarkers -> {Automatic, 13}, ImageSize -> 550, Frame -> {{True, False}, {False, False}}, PlotTheme -> {"LargeLabels", "Business"}]

Out[4]=

Разместите метки с центром на данных.

In[5]:=

opts = {PlotTheme -> {"LargeLabels", "Marketing"}, ImageSize -> 550, Frame -> {{True, False}, {False, False}}, PlotRangePadding -> Scaled[.05], Frame -> {{True, False}, {False, False}}};

In[6]:=

SeedRandom[4]; DateListStepPlot[ RandomReal[{0, 0.3}, 12] -> months, {2000, 1}, LabelingFunction -> Center, opts]

Out[6]=