OFFSET
0,4
COMMENTS
A weak run-sum of a sequence is the sum of any consecutive constant subsequence. For example, the weak run-sums of (3,2,2,1) are {1,2,3,4}.
This is a kind of completeness property, cf. A126796.
EXAMPLE
The a(1) = 1 through a(8) = 7 partitions:
(1) (11) (21) (211) (311) (321) (3211) (3221)
(111) (1111) (2111) (3111) (4111) (32111)
(11111) (21111) (22111) (41111)
(111111) (31111) (221111)
(211111) (311111)
(1111111) (2111111)
(11111111)
MATHEMATICA
normQ[m_]:=m=={}||Union[m]==Range[Max[m]];
msubs[s_]:=Join@@@Tuples[Table[Take[t, i], {t, Split[s]}, {i, 0, Length[t]}]];
wkrs[y_]:=Union[Total/@Select[msubs[y], SameQ@@#&]];
Table[Length[Select[IntegerPartitions[n], normQ[Rest[wkrs[#]]]&]], {n, 0, 15}]
CROSSREFS
For parts instead of weak run-sums we have A000009.
For multiplicities instead of weak run-sums we have A317081.
A005811 counts runs in binary expansion.
A353835 counts distinct run-sums of prime indices.
A353861 counts distinct weak run-sums of prime indices.
A353932 lists run-sums of standard compositions.
KEYWORD
nonn,more
AUTHOR
Gus Wiseman, Jun 04 2022
STATUS
proposed