Я использую это для создания столбчатой диаграммы:
BarChart[
Reverse@data,
BarOrigin -> Left,
ChartLabels ->
Placed[{Reverse@labels, Reverse@data}, {Before, After}],
ChartElementFunction -> "FadingRectangle"
]
With data = {7, 10, 0, 6, 0, 3, 5}
это дает
Проблема в том, что некоторые значения данных равны 0, а BarChart
даже не добавляет меток для них. Вместо этого остается открытое пространство. Как я могу заставить его по-прежнему добавлять метки, даже если значения равны 0?
Это с Mathematica 8.