OFFSET
0,5
COMMENTS
A binary carry of two positive integers is an overlap of the positions of 1's in their reversed binary expansion. An integer partition is binary carry-connected if the graph whose vertices are the parts and whose edges are binary carries is connected.
EXAMPLE
The a(1) = 1 through a(11) = 6 strict partitions (A = 10, B = 11):
(1) (2) (3) (4) (5) (6) (7) (8) (9) (A) (B)
(31) (32) (51) (53) (54) (64) (65)
(321) (62) (63) (73) (74)
(71) (72) (91) (632)
(531) (532) (731)
(541) (5321)
(631)
(721)
MATHEMATICA
binpos[n_]:=Join@@Position[Reverse[IntegerDigits[n, 2]], 1];
csm[s_]:=With[{c=Select[Tuples[Range[Length[s]], 2], And[OrderedQ[#], UnsameQ@@#, Length[Intersection@@s[[#]]]>0]&]}, If[c=={}, s, csm[Sort[Append[Delete[s, List/@c[[1]]], Union@@s[[c[[1]]]]]]]]];
Table[Length[Select[IntegerPartitions[n], UnsameQ@@#&&Length[csm[binpos/@#]]<=1&]], {n, 0, 30}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Gus Wiseman, Mar 28 2019
STATUS
approved