Gráficos y visualización

Use estilos incorporados para gráficos de cajas y bigotes 

In[1]:=

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

In[2]:=

X Grid[Partition[ BoxWhiskerChart[data, #, PlotLabel -> #, ChartStyle -> 33, AspectRatio -> 1, BaseStyle -> {FontFamily -> "Helvetica"}, LabelStyle -> Bold] & /@ {"Notched", "Outliers", "Median", "Basic", "Mean", "Diamond"}, 3]]

Out[2]=