How to change Callout leader size in Plot?

Question

Take this example:

Plot[Callout[Sin[x], Sin[x], Above], {x, 0, Pi}]

Question: How can I change the length of the line connecting the $\sin(x)$ label with the plotted curve?

I believe this line is called the "leader" and it can be modified with the LeaderSize option. But adding either LeaderSize -> 10 or LeaderSize -> {10} to Callout makes no difference.

Motivation: When the plot has a wide aspect ratio, the leaders tend to be too long. I assume this is because they are computed relative to the figure width.

Plot[Callout[Sin[x], Sin[x], Above], {x, 0, Pi}, AspectRatio -> 1/4]

Answer 1

Here is a workaround (besides the obvious one of specifying an explicit coordinate instead of Above) where I shrink the neck size:

Plot[
    Callout[
        Sin[x],
        Rotate[Sin[x], -Pi/2],
        Above,
        FrameMargins -> 0,
        LeaderSize -> {Automatic, {0, Pi/2}}
    ],
    {x, 0, Pi},
    AspectRatio -> 1/4
]

Another possibility is to bend the callout:

Plot[
    Callout[
        Sin[x],
        Sin[x],
        Above,
        LeaderSize -> {Automatic, {0, Pi/4}}
    ],
    {x, 0, Pi},
    AspectRatio -> 1/4
]

Answer 2

maybe help:

Table[Plot[
  Callout[Sin[x], Sin[x], Above, 
   LeaderSize -> {100, 90 \[Degree], i}], {x, 0, Pi}, 
  PlotRange -> Full], {i, 0, 30, 5}]

or

Manipulate[
 Plot[Callout[Sin[x], "Sin[x]", {Pi/2, a}, Pi/2], {x, 0, Pi}, 
  PlotRange -> {Automatic, {0, 2}}], {a, 1.1, 1.75}]

Answer 3

Consider specifying position for the callout {pos, epos}

Plot[Callout[Sin[x], "Sin(x)", {N@\[Pi]/2, 2.}, 
CalloutMarker -> "\[EmptyCircle]", CalloutStyle -> Gray], {x, 0, 
Pi}, PlotRange -> {{0, 3}, {0, 3}}]

Answer 4

Using different neck lengths:

 Plot[Callout[Sin[x], Rotate[Sin[x],- 90 Degree], Above, 
   LeaderSize -> {{100, 90 Degree, 0}, {#, 90 Degree}}], {x, 0, Pi}, 
  PlotRange -> Full, ImagePadding->50, ImageSize-> 300] &/@ {0, 30, 70}// Row