[Solved] How to display a Barchart ChartLabels below the x-Axis with one group of data

Questions
,
1

Hello

The code below works as expected with 2 groups of data, `ChartLabels show up below the x-axis as expected

  BarChart[{{2, 3, 5}, {10, 20, 30}}, ChartLegends -> {"L1", "L2"}, 
  ChartLabels -> {Placed[{S1, S2}, Axis, Style[#, Bold, 12, Black] &], 
   None},
 LabelingFunction -> (Placed[Style[Row[{#}], Bold, Red], Above] &)]

But with one group of data only I am not able to add a `ChartLabels anymore below the single group on the X-axis (here S1). Nothing shows up.

BarChart[{2, 3, 5}, ChartLegends -> {"L1"}, 
ChartLabels -> {Placed[{S1}, Axis, Style[#, Bold, 12, Black] &], 
None},
LabelingFunction -> (Placed[Style[Row[{#}], Bold, Red], Above] &)]

What is the solution?

Question MMA.nb (49.6 KB)

2

Possible solution: remove None (now we see “S1”, but in wrong place)
and add empty string:

BarChart[{2, 3, 5}, ChartLegends -> {"L1"},
 ChartLabels -> {Placed[{"", "S1"}, Axis, 
    Style[#, Bold, 12, Black] &]}, 
 LabelingFunction -> (Placed[Style[Row[{#}], Bold, Red], Above] &)]