Adaptive Point Size Selection 

Point sizes for plots are automatically chosen so points are visible and distinct for varying numbers and distributions of values.

show complete Wolfram Language inputhide input

In[1]:=

X Grid[Partition[ Table[ListPlot[RandomReal[NormalDistribution[], {n, 2}], PlotLabel -> Row[{n, " points"}], ImageSize -> 220, Ticks -> None], {n, {10, 100, 1000, 10000}}], 2]]

Out[1]=

Point sizes scale with the size of the graphic.

show complete Wolfram Language inputhide input

In[2]:=

X Block[{data = RandomReal[NormalDistribution[], {200, 2}]}, {tiny, small, medium, large} = Table[ListPlot[data, Frame -> True, FrameTicks -> None, ImagePadding -> {{0, 1}, {1, 0}}, Axes -> False, AspectRatio -> 1/1.6, ImageSize -> size], {size, {80, 160, 240, 400}}] ];

In[3]:=

X Grid[{ {large, SpanFromLeft, SpanFromLeft}, {medium, Spacer[{80, 50}], tiny}, {SpanFromAbove, small, SpanFromLeft} } , Spacings -> {0, 0}, Alignment -> Top]

Out[3]=