Use datos ponderados en lugar de un conjunto de datos completo 

Use datos ponderados en lugar de un conjunto de datos grande cuando cree gráficos y diagramas estadísticos.

In[1]:=

X data = RandomReal[{-5, 5}, 1000];

In[2]:=

X A = WeightedData[data, PDF[NormalDistribution[], #] &];

In[3]:=

X Block[{$PlotTheme = "Scientific"}, Grid[Partition[{QuantilePlot[A], BoxWhiskerChart[A], SmoothHistogram[A, Filling -> Axis], Histogram[A]}, 2]]]

Out[3]=