A035393 Number of partitions of n into parts 7k or 7k+4.

0, 0, 0, 1, 0, 0, 1, 1, 0, 0, 2, 1, 0, 2, 2, 1, 0, 4, 2, 1, 3, 5, 2, 1, 7, 5, 2, 6, 9, 5, 2, 13, 10, 5, 9, 18, 10, 5, 21, 20, 10, 16, 30, 21, 10, 35, 35, 21, 25, 52, 37, 21, 55, 62, 38, 43, 83, 67, 38, 88, 102, 69, 68, 135, 112, 70, 135, 168, 117, 112, 208, 188, 119, 209, 265

Offset

1,11

Links

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

Formula

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

Mathematica

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

Crossrefs

Sequence in context: A328312 A289281 A212957 * A068913 A128306 A305152

Adjacent sequences: A035390 A035391 A035392 * A035394 A035395 A035396

Keyword

nonn

Author

Olivier Gérard

Status

approved