A266138 Expansion of Product_{k>=1} 1/(1 - k*(x^(2*k+1))).

1, 0, 0, 1, 0, 2, 1, 3, 2, 5, 7, 7, 11, 13, 24, 26, 35, 44, 69, 78, 112, 150, 188, 245, 318, 429, 537, 729, 924, 1177, 1534, 1965, 2518, 3287, 4108, 5394, 6857, 8604, 11022, 14073, 17899, 22549, 28900, 36182, 45954, 58395, 72912, 92118, 116201, 146279

Offset

0,6

Links

Vaclav Kotesovec, Table of n, a(n) for n = 0..10000

Formula

a(n) ~ c * 3^(n/7), where

c = 617630.638335... if mod(n,7) = 0

c = 617630.321433... if mod(n,7) = 1

c = 617630.360795... if mod(n,7) = 2

c = 617630.429073... if mod(n,7) = 3

c = 617630.357078... if mod(n,7) = 4

c = 617630.421636... if mod(n,7) = 5

c = 617630.341606... if mod(n,7) = 6.

Mathematica

nmax=80; CoefficientList[Series[Product[1/(1-k*(x^(2*k+1))), {k, 1, nmax}], {x, 0, nmax}], x]

Crossrefs

Cf. A006906, A077335, A087897, A265951, A266137.

Sequence in context: A263150 A145794 A176741 * A014000 A339612 A075257

Adjacent sequences: A266135 A266136 A266137 * A266139 A266140 A266141

Keyword

nonn

Author

Vaclav Kotesovec, Dec 21 2015

Status

approved