A300586 Number of partitions of n into distinct squarefree parts that do not divide n.

1, 0, 0, 0, 0, 1, 0, 1, 1, 1, 1, 2, 1, 4, 2, 2, 4, 6, 2, 8, 4, 6, 6, 15, 4, 11, 10, 12, 8, 30, 3, 38, 24, 17, 24, 23, 14, 70, 36, 37, 23, 102, 8, 122, 49, 39, 80, 177, 38, 136, 54, 113, 101, 297, 60, 152, 102, 192, 226, 485, 28, 571, 312, 200, 390, 338, 84, 908, 393, 507, 104, 1229, 241, 1421

Offset

0,12

Links

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

Index entries for sequences related to partitions

Example

a(14) = 2 because we have [11, 3] and [6, 5, 3].

Mathematica

Table[SeriesCoefficient[Product[(1 + Boole[Mod[n, k] != 0 && SquareFreeQ[k]] x^k), {k, 1, n}], {x, 0, n}], {n, 0, 73}]

Crossrefs

Cf. A005117, A087188, A200745, A209402, A225245, A300584, A300585.

Sequence in context: A348045 A086685 A343998 * A094571 A316477 A104733

Adjacent sequences: A300583 A300584 A300585 * A300587 A300588 A300589

Keyword

nonn

Author

Ilya Gutkovskiy, Mar 09 2018

Status

approved