2
$\begingroup$

So I want to be able to put axes labels simultaneously as the numerical labels.

I can achieve that with the following, but is there a better/cleaner way? I can't use callout, because I am using version 10.4.0 for Microsoft Windows (64-bit) (February 26, 2016)

names = {cat, dog, monkey} data = {7,12,3} BarChart[data, ChartLabels -> names , BarOrigin -> Left, ScalingFunctions -> "Log", AspectRatio -> 2, LabelingFunction -> (Placed[Row[{"$", #}], After] &)]

enter image description here

Improve this question
$\endgroup$

1 Answer 1

Reset to default
4
$\begingroup$

Not necessarily better/cleaner than your approach but you can also add multiple labels using the option ChartLabels only:

BarChart[data, ChartLabels -> Placed[{names, Row[{"$", #}] & /@ data}, {Axis, After}], BarOrigin -> Left, ScalingFunctions -> "Log", AspectRatio -> 2]

enter image description here

Improve this answer
$\endgroup$

Start asking to get answers

Find the answer to your question by asking.

Ask question

Explore related questions

See similar questions with these tags.