Group Abstract Group Abstract

Message Boards Message Boards

Place label below plot

Posted 2 years ago

How to place PlotLabels under plot

RadInit = {MeanAround[{3., 2, 2}], MeanAround[{3., 2, 2}], 
   MeanAround[{3., 2, 2}], MeanAround[{3., 2, 2}]};
BarChart[RadInit, ChartElementFunction -> "GlassRectangle", 
 ChartStyle -> "Pastel", ImageSize -> 400,
  ChartLabels -> {"1", "2", "3", "4" }, 
 ChartLegends -> {"1-Mt", "2-MT" ,  "3-RN", "4-RT" }, 
PlotLabel -> Placed["LabelName", Below], 
 LabelStyle -> {FontSize -> 11, FontFamily -> "Courier new", Bold},
 AxesLabel -> {"Sample", "%"}, AxesOrigin -> {.9, 0}, 
 PlotRange -> {{0.12, 3.5}, Automatic}, AspectRatio -> 0.4, 
 BarSpacing -> 0.2, LabelingFunction -> Bottom]

enter image description here

POSTED BY: Ion Ganea
4 Replies

I get no error at all, either with or without quotes. Without quotes the label is read as a product, and the order of factors is rearranged into standard order. Your error message contains Bottom],<<457>>,Bottom], which would mean that in the place of the label the system sees 457 elements, very strange.

POSTED BY: Gianluca Gorni
Posted 2 years ago
POSTED BY: Ion Ganea

PlotLabel is a very archaic construct. Until Wolfram updates it, you can use Column:

Column[{Plot[x, {x, 0, 1}], "bottom label"}, Center]
POSTED BY: Gianluca Gorni
Posted 2 years ago

You could just wrap Labeled around the whole thing:

Labeled[
  BarChart[...],
  "LabelName",
  Bottom]
POSTED BY: Eric Rimbey
Reply to this discussion
Community posts can be styled and formatted using the Markdown syntax.
Reply Preview
Attachments
Remove
or Discard