Wolfram Cloud Page

Rows 1 to 4 have 5, 4, 2, 2 dots:

[◼]	FerrersDiagram

[{5,4,2,2}]

In[]:=

Out[]=

Here is a random choice of one of the 204226 partitions of 50:

Framed@

[◼]	FerrersDiagram

@RandomChoice[IntegerPartitions@50]

In[]:=

●

Out[]=