A035392 Number of partitions of n into parts 7k or 7k+3.

0, 0, 1, 0, 0, 1, 1, 0, 1, 2, 0, 1, 2, 2, 1, 2, 4, 1, 2, 5, 4, 2, 5, 8, 2, 5, 10, 7, 5, 11, 14, 5, 11, 19, 12, 11, 21, 24, 11, 22, 33, 22, 22, 38, 41, 22, 40, 58, 37, 41, 68, 67, 41, 73, 95, 63, 75, 114, 108, 76, 124, 155, 106, 129, 188, 173, 131, 208, 246, 174, 218, 303, 271

Offset

1,10

Links

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

Formula

a(n) ~ exp(2*Pi*sqrt(n/21)) * Gamma(3/7) / (4 * 3^(13/28) * 7^(1/28) * Pi^(4/7) * n^(27/28)). - Vaclav Kotesovec, Aug 27 2015

Mathematica

nmax = 100; Rest[CoefficientList[Series[Product[1/((1 - x^(7k+7))*(1 - x^(7k+3))), {k, 0, nmax}], {x, 0, nmax}], x]] (* Vaclav Kotesovec, Aug 27 2015 *)

Crossrefs

Sequence in context: A303113 A065051 A084665 * A007149 A028832 A260411

Adjacent sequences: A035389 A035390 A035391 * A035393 A035394 A035395

Keyword

nonn

Author

Olivier Gérard

Status

approved