데이터와 상응하는 라벨 넣기: Wolfram Language 11의 신기능

데이터와 상응하는 라벨 넣기

Callout과 Labeled를 데이터와 상응하는 명명된 위치에 둘 수 있습니다.

전체 Wolfram 언어 입력 표시하기

In[1]:=

options = Sequence @@ {Filling -> Axis, ImageSize -> 400};
data1 = Table[{k, PDF[BinomialDistribution[50, 0.2], k]}, {k, 0, 
    50}];
data2 = Table[{k, PDF[BinomialDistribution[50, 0.5], k]}, {k, 0, 
    50}];
data3 = Table[{k, PDF[BinomialDistribution[50, 0.7], k]}, {k, 0, 50}];

In[2]:=

ListPlot[{Callout[data1, "0.2", Above], Callout[data2, "0.5", Above], 
  Callout[data3, "0.7", Above]}, options]

Out[2]=

In[3]:=

Grid[Partition[{
   Plot[{Labeled[Sinc[x - 1], Sinc[x - 1], Above], 
     Cos[x/1.1 + 0.3]/2}, {x, 0, 8}, ImageSize -> 250, 
    PlotTheme -> "Business", PlotLabel -> "Above"],
   Plot[{Labeled[Sinc[x - 1], Sinc[x - 1], Below], 
     Cos[x/1.1 + 0.3]/2}, {x, 0, 8}, ImageSize -> 250, 
    PlotTheme -> "Business", PlotLabel -> "Below"]}, 2]]

Out[3]=

LabelingFunction을 장소로 사용하여 자동으로 라벨을 위치시킬 수 있습니다.

In[4]:=

data = Accumulate@Table[RandomInteger[5], 10];
ListLinePlot[data -> data, LabelingFunction -> Top, 
 PlotMarkers -> Automatic, Filling -> Axis, PlotTheme -> "Business"]

Out[4]=

Wolfram 언어™

데이터와 상응하는 라벨 넣기

관련 예제