login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A263199 Expansion of Product_{k>=1} 1/(1 - x^(2*k+1))^(2*k+1). 4
1, 0, 0, 3, 0, 5, 6, 7, 15, 19, 36, 41, 77, 100, 156, 230, 317, 482, 665, 981, 1354, 1967, 2710, 3852, 5363, 7453, 10373, 14287, 19780, 27022, 37220, 50583, 69140, 93693, 127098, 171640, 231469, 311323, 417627, 559577, 747122, 996947, 1325872, 1761900 (list; graph; refs; listen; history; text; internal format)
OFFSET
0,4
LINKS
FORMULA
For n>1, a(n) = A262811(n) - A262811(n-1).
a(n) ~ A * Zeta(3)^(17/36) * exp(-1/12 + 3 * Zeta(3)^(1/3) * n^(2/3)/2) / (2^(2/3) * sqrt(3*Pi) * n^(35/36)), where Zeta(3) = A002117 and A = A074962 is the Glaisher-Kinkelin constant.
MAPLE
with(numtheory):
b:= proc(n) option remember; `if`(n=0, 1, add(add(d*
`if`(d::even, 0, d), d=divisors(j))*b(n-j), j=1..n)/n)
end:
seq(b(n)-b(n-1), n=0..60); # after Alois P. Heinz
MATHEMATICA
nmax = 100; CoefficientList[Series[Product[1/(1 - x^(2*k+1))^(2*k+1), {k, 1, nmax}], {x, 0, nmax}], x]
CROSSREFS
Sequence in context: A342303 A193508 A307728 * A052483 A373775 A308116
KEYWORD
nonn
AUTHOR
Vaclav Kotesovec, Oct 12 2015
STATUS
approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified September 17 17:26 EDT 2024. Contains 375990 sequences. (Running on oeis4.)