OFFSET
0,4
LINKS
Vaclav Kotesovec, Table of n, a(n) for n = 0..10000
Vaclav Kotesovec, A method of finding the asymptotics of q-series based on the convolution of generating functions, arXiv:1509.08708 [math.CO], Sep 30 2015
FORMULA
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
KEYWORD
nonn
AUTHOR
Vaclav Kotesovec, Oct 12 2015
STATUS
approved