stacked BarChart shows no edges for big list of data

Question

For big numbers of columns, a stacked BarChart does not display edges anymore. For low numbers of columns they appear again. Is there a way to force Mathematica displaying the edges, even for big lists?

Here is an example:

no edges:

BarChart[Table[RandomReal[9], {i, 35}, {j, 11}], 
ChartLayout -> "Stacked", BarSpacing -> None]

with edges:

BarChart[Table[RandomReal[9], {i, 5}, {j, 11}], 
ChartLayout -> "Stacked", BarSpacing -> None]

Thank you very much for your help!!

All the best, Kilian

kglr · Accepted Answer · 2018-06-19T20:29:40.700

4

bc = BarChart[Table[RandomReal[9], {i, 35}, {j, 11}], 
   ChartLayout -> "Stacked", BarSpacing -> None]

Somehow, the rectangles are rendered with the directive

EdgeForm[Directive[Opacity[0.]]

when the input data is larger than some threshold.

You can post-process the output to change Opacity[0.] to Opacity[1.]:

bc /.  Opacity[0.] -> Opacity[1.]

edited Jun 19 '18 at 20:29

answered Jun 19 '18 at 20:22

kglr

394,356
18
477
896

Thank you so much... You rescue my evening;) Good job!! – Kilian Jun 19 '18 at 20:32
@Kilian, glad it was useful. Thank you for the accept. – kglr Jun 19 '18 at 20:38

score 2 · Answer 2 · answered Jun 19 '18 at 20:44

I think @kglr has hit on the core issue of the problem by noting the addition of the Opacity directive once you cross a threshold.

If you want to include the solution in the code, you can specify it with ChartStyle andEdgeForm directly.

BarChart[Table[RandomReal[9], {i, 35}, {j, 11}], 
 ChartLayout -> "Stacked", BarSpacing -> None, 
 ChartStyle -> EdgeForm[{Thin, Opacity[1]}]]

stacked BarChart shows no edges for big list of data

2 Answers2