Message Boards

WOLFRAM COMMUNITY

4096 Views

5 Replies

5 Total Likes

View groups...

Follow this post

Share this post:

GROUPS:

Graphics and Visualization Wolfram Language

Does Callout work in Graphics?

Richard Frost

Richard Frost, Frost Concepts

Posted 3 years ago

Do Callouts work in Graphics? If so, how would I have the values of centers appear below the ellipses in this example? centers = {0, 28.7, 33.8, 48.0, 55.4, 71.9}; Graphics[ Join[ ({Black, Circle[{#, 0}, {0.1, 0.4}]} & /@ centers), {{Red, Inset["\|", {75, 0}]}} ], ImageSize -> {640, Automatic} ]

POSTED BY: Richard Frost

5 Replies

Sort By:

Richard Frost

Richard Frost, Frost Concepts

Posted 3 years ago

Here I used Inset to create callouts. The application is sequence coverage of gene locations in shotgun whole genome scans. Notice some chromosomes contain gaps, resulting in non-contiguous chromosome assembly.

POSTED BY: Richard Frost

Richard Frost

Richard Frost, Frost Concepts

Posted 3 years ago

That's a creative solution!

POSTED BY: Richard Frost

Gustavo Delfino

Posted 3 years ago

Well, we can extract the graphic primitives from the ListPlot output, even though it feels a bit hackish: Graphics[ Join[({Black, Circle[{#, 0}, {0.1, 0.4}]} & /@ centers), {{Red, Inset["\|", {75, 0}]}}], ImageSize -> {640, Automatic}, Prolog -> ListPlot[Callout[{#, 0}, #, Below] & /@ centers, PlotMarkers -> ""][[1]], ImagePadding -> 10 ]

Well, we can extract the graphic primitives from the ListPlot output, even though it feels a bit hackish:

Graphics[
  Join[({Black, Circle[{#, 0}, {0.1, 0.4}]} & /@ centers),
       {{Red, Inset["|", {75, 0}]}}], 
  ImageSize -> {640, Automatic},
  Prolog -> 
    ListPlot[Callout[{#, 0}, #, Below] & /@ centers, PlotMarkers -> ""][[1]],
  ImagePadding -> 10
]

callout plot