Graphics & Visualization

Use Built-in Appearances for Distribution Charts 

In[1]:=

X data = RandomVariate[ NormalDistribution[RandomInteger[5], 1], {6, 100}];

In[2]:=

X Grid[Partition[ BoxWhiskerChart[data, ChartElementFunction -> #, PlotLabel -> #, ChartStyle -> 33, BaseStyle -> {FontFamily -> "Helvetica"}, LabelStyle -> Bold] & /@ ChartElementData["DistributionChart"], 3]]

Out[2]=