OFFSET
0,4
COMMENTS
The Heinz numbers of these partitions are given by A325197.
LINKS
EXAMPLE
The a(3) = 2 through a(10) = 15 partitions (empty columns not shown):
(3) (41) (33) (43) (521) (333) (433)
(111) (2111) (42) (2221) (32111) (441) (442)
(222) (4111) (522) (532)
(411) (531) (541)
(2211) (3222) (3322)
(3111) (5211) (3331)
(32211) (4222)
(33111) (4411)
(42111) (5221)
(5311)
(32221)
(33211)
(42211)
(43111)
(52111)
MATHEMATICA
otb[ptn_]:=Min@@MapIndexed[#1+#2[[1]]-1&, Append[ptn, 0]];
otbmax[ptn_]:=Max@@MapIndexed[#1+#2[[1]]-1&, Append[ptn, 0]];
Table[Length[Select[IntegerPartitions[n], otbmax[#]-otb[#]==2&]], {n, 0, 30}]
CROSSREFS
KEYWORD
nonn,look
AUTHOR
Gus Wiseman, Apr 11 2019
STATUS
approved