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]
