|
|
A029860
|
|
Euler transform of 4 3 2 1 1 1 1 1 1 1 ...
|
|
2
|
|
|
1, 4, 13, 34, 80, 171, 344, 654, 1193, 2096, 3573, 5926, 9605, 15243, 23752, 36394, 54938, 81794, 120271, 174812, 251412, 358022, 505210, 706836, 981091, 1351589, 1848981, 2512695, 3393405, 4555755, 6082106, 8076723, 10671405, 14031845, 18365995, 23933610
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
LINKS
|
|
|
FORMULA
|
a(n) ~ exp(Pi*sqrt(2*n/3)) * 3*sqrt(3)*n^2 / (2*Pi^6). - Vaclav Kotesovec, May 31 2019
|
|
MATHEMATICA
|
nmax = 50; CoefficientList[Series[1/((1-x)^3*(1-x^2)^2*(1-x^3))*Product[1/(1-x^k), {k, 1, nmax}], {x, 0, nmax}], x] (* Vaclav Kotesovec, May 31 2019 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|