A265830 Expansion of Product_{k>=1} 1/(1 - (4*k-3)*x^(4*k-3)).

1, 1, 1, 1, 1, 6, 6, 6, 6, 15, 40, 40, 40, 53, 98, 223, 223, 240, 386, 611, 1236, 1257, 1459, 2189, 3314, 6464, 6891, 8630, 12280, 17934, 34094, 37282, 45977, 64260, 93317, 177015, 199516, 243028, 335386, 486558, 914525, 1027071, 1246171, 1717917, 2499859

Offset

0,6

Links

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

Formula

a(n) ~ c * 5^(n/5), where

c = 2.507825733169876852324734244164361344346137946210165985160... if mod(n,5) = 0

c = 2.044059357237393849525094744007074653835911858380855756712... if mod(n,5) = 1

c = 1.804839638762776493150118361894215102701328815651225876275... if mod(n,5) = 2

c = 1.804038421648852594778176511112001297019074444232793470829... if mod(n,5) = 3

c = 1.892664578176041496503561133229019191251461591133509951564... if mod(n,5) = 4.

Mathematica

nmax = 40; CoefficientList[Series[Product[1/(1 - (4*k-3)*x^(4*k-3)), {k, 1, nmax}], {x, 0, nmax}], x]

Crossrefs

Cf. A067553, A265820, A265821, A265828, A265829.

Sequence in context: A092937 A285287 A285048 * A346621 A116571 A054641

Adjacent sequences: A265827 A265828 A265829 * A265831 A265832 A265833

Keyword

nonn

Author

Vaclav Kotesovec, Dec 16 2015

Status

approved