OFFSET
0,3
FORMULA
a(n > 1) = A317081(n) + 1.
EXAMPLE
The a(1) = 1 through a(8) = 12 partitions:
(1) (2) (3) (4) (5) (6) (7) (8)
(11) (21) (31) (32) (42) (43) (53)
(111) (211) (41) (51) (52) (62)
(1111) (221) (321) (61) (71)
(311) (411) (322) (332)
(11111) (111111) (331) (422)
(421) (431)
(511) (521)
(3211) (611)
(1111111) (3221)
(4211)
(11111111)
MATHEMATICA
nQ[ptn_]:=Or[ptn=={}, Union[ptn]=={1}, Union[Length/@Split[ptn]]==Range[Max[Length/@Split[ptn]]]];
Table[Length[Select[IntegerPartitions[n], nQ]], {n, 0, 30}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Gus Wiseman, Mar 05 2020
STATUS
approved