A294142 Number of partitions of n into distinct odd parts that do not divide n.
1, 0, 0, 0, 0, 0, 0, 0, 1, 0, 1, 0, 1, 0, 2, 0, 3, 1, 2, 2, 3, 0, 4, 4, 4, 2, 6, 1, 6, 8, 4, 10, 12, 4, 12, 5, 7, 17, 17, 8, 14, 24, 9, 29, 24, 4, 33, 40, 25, 29, 28, 23, 45, 63, 23, 30, 52, 37, 84, 99, 26, 113, 112, 23, 143, 60, 57, 173, 143, 89, 70, 226, 87, 256, 256, 53, 245, 135, 127, 378, 233
Offset: 0
Keywords
Examples
a(14) = 2 because we have [11, 3] and [9, 5].
Programs
-
Mathematica
Table[SeriesCoefficient[Product[1 + Boole[Mod[n, k] > 0 && OddQ[k]] x^k, {k, 1, n}], {x, 0, n}], {n, 0, 80}]