OFFSET
0,3
COMMENTS
A mode in a multiset is an element that appears at least as many times as each of the others. For example, the modes in {a,a,b,b,b,c,d,d,d} are {b,d}.
EXAMPLE
The a(1) = 1 through a(8) = 13 partitions:
(1) (2) (3) (4) (5) (6) (7) (8)
(11) (111) (22) (311) (33) (322) (44)
(211) (2111) (222) (511) (422)
(1111) (11111) (411) (3211) (611)
(3111) (4111) (2222)
(21111) (22111) (4211)
(111111) (31111) (5111)
(211111) (32111)
(1111111) (41111)
(221111)
(311111)
(2111111)
(11111111)
MATHEMATICA
Table[If[n==0, 0, Length[Select[IntegerPartitions[n], Last[Length/@Split[#]]>Max@@Most[Length/@Split[#]]&]]], {n, 0, 30}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Gus Wiseman, Jul 16 2023
STATUS
approved