A294141 Number of partitions of n into odd parts that do not divide n.

1, 0, 0, 0, 0, 0, 0, 0, 1, 0, 1, 1, 1, 2, 3, 0, 5, 5, 2, 7, 5, 1, 11, 14, 6, 9, 20, 5, 18, 33, 5, 43, 50, 12, 58, 17, 16, 91, 96, 26, 58, 146, 23, 183, 148, 11, 241, 285, 88, 187, 152, 98, 367, 537, 87, 177, 376, 179, 857, 983, 77, 1195, 1274, 79, 1596, 468, 290, 2117, 1887, 549, 460, 3064, 440

Offset

0,14

Links

Table of n, a(n) for n=0..72.

Index entries for sequences related to partitions

Example

a(13) = 2 because we have [7, 3, 3] and [5, 5, 3].

Mathematica

Table[SeriesCoefficient[Product[1/(1 - Boole[Mod[n, k] > 0 && OddQ[k]] x^k), {k, 1, n}], {x, 0, n}], {n, 0, 72}]

Crossrefs

Cf. A000009, A098743, A128515, A171565, A200745, A294142.

Sequence in context: A057637 A258913 A167485 * A265513 A140508 A063956

Adjacent sequences: A294138 A294139 A294140 * A294142 A294143 A294144

Keyword

nonn

Author

Ilya Gutkovskiy, Oct 23 2017

Status

approved