OFFSET
0,6
FORMULA
EXAMPLE
The a(3) = 1 through a(13) = 12 partitions (A..C = 10..12):
21 31 32 42 43 53 54 64 65 75 76
41 51 52 62 63 73 74 84 85
61 71 72 82 83 93 94
3221 81 91 92 A2 A3
4221 4321 A1 B1 B2
5221 4331 4332 C1
5321 5331 5332
6221 5421 5431
6321 6331
7221 6421
7321
8221
MATHEMATICA
Table[Length[Select[IntegerPartitions[n], EvenQ[Length[#]]&&And@@Table[#[[i]]!=#[[i+1]], {i, 1, Length[#]-1, 2}]&]], {n, 0, 30}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Gus Wiseman, Jan 31 2022
STATUS
approved