OFFSET
0,6
EXAMPLE
The a(3) = 1 through a(9) = 12 partitions:
(21) (211) (221) (42) (421) (422) (63)
(2111) (321) (2221) (521) (621)
(2211) (3211) (3221) (3321)
(21111) (22111) (4211) (4221)
(211111) (22211) (5211)
(32111) (22221)
(221111) (32211)
(2111111) (42111)
(222111)
(321111)
(2211111)
(21111111)
MATHEMATICA
Table[Length[Select[IntegerPartitions[n], MemberQ[Divide@@@Partition[#, 2, 1], 2]&]], {n, 0, 30}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Gus Wiseman, Jan 20 2022
STATUS
approved