|
|
A301980
|
|
Expansion of Product_{k>=1} (1 + x^k)^A065958(k).
|
|
4
|
|
|
1, 1, 5, 15, 40, 106, 281, 685, 1690, 4050, 9496, 21908, 49902, 111740, 247465, 541353, 1171070, 2507602, 5319085, 11178947, 23298878, 48169708, 98834943, 201335651, 407345067, 818767703, 1635528657, 3247634227, 6412057831, 12590738729, 24593652845
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,3
|
|
LINKS
|
|
|
FORMULA
|
a(n) ~ exp(2^(5/4) * sqrt(7) * Zeta(3)^(1/4) * n^(3/4) / sqrt(3*Pi) - sqrt(Pi) * n^(1/4) / (2^(9/4) * 3^(3/2) * sqrt(7) * Zeta(3)^(1/4))) * 21^(1/4) * Zeta(3)^(1/8) / (2^(15/8) * Pi^(3/4) * n^(5/8)).
|
|
MATHEMATICA
|
nmax = 40; CoefficientList[Series[Exp[Sum[-(-1)^j * Sum[Sum[MoebiusMu[k/d]^2*d^2, {d, Divisors@k}] * x^(j*k) / j, {k, 1, Floor[nmax/j] + 1}], {j, 1, nmax}]], {x, 0, nmax}], x] (* Vaclav Kotesovec, Mar 31 2018 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|