OFFSET
0,6
EXAMPLE
The a(3) = 1 through a(8) = 15 partitions:
(21) (31) (32) (42) (43) (53)
(41) (51) (52) (62)
(221) (321) (61) (71)
(311) (411) (322) (332)
(2111) (331) (431)
(421) (521)
(511) (611)
(2221) (3221)
(3211) (3311)
(4111) (4211)
(22111) (5111)
(31111) (22211)
(211111) (32111)
(311111)
(2111111)
MATHEMATICA
Table[Length[Select[IntegerPartitions[n], Length[Select[Permutations[#], SameQ@@Total/@Split[#]&]]==0&]], {n, 0, 15}]
CROSSREFS
For distinct instead of equal run-sums we appear to have A381717, q.v.
Counting and ranking partitions by run-lengths and run-sums:
KEYWORD
nonn
AUTHOR
Gus Wiseman, Apr 17 2025
EXTENSIONS
More terms from Bert Dobbelaere, Apr 26 2025
STATUS
approved
