Is there any more specific function to achieve this same result?
list={410, 1265, 2262, 2255, 3828, 6739, 15566, 12210}
BarChart[Apply [Labeled, Reverse [Transpose [{Range [Length[list]], list}], 2], {1}]]
3
$\begingroup$
$\endgroup$
-
$\begingroup$ What does "more specific" mean? $\endgroup$ – David G. Stork Jul 30 '18 at 17:22
6
$\begingroup$
$\endgroup$
BarChart @ MapIndexed[Labeled[#, #2[[1]]] &, list]
Alternatively,
BarChart @ Thread[Labeled[list, Range @ Length @ list]] (* or *)
BarChart[list, ChartLabels -> Range[Length @ list]]
same picture
