|
%I #14 May 31 2019 11:28:20
%S 1,4,13,34,80,171,344,654,1193,2096,3573,5926,9605,15243,23752,36394,
%T 54938,81794,120271,174812,251412,358022,505210,706836,981091,1351589,
%U 1848981,2512695,3393405,4555755,6082106,8076723,10671405,14031845,18365995,23933610
%N Euler transform of 4 3 2 1 1 1 1 1 1 1 ...
%H N. J. A. Sloane, <a href="/transforms.txt">Transforms</a>
%F a(n) ~ exp(Pi*sqrt(2*n/3)) * 3*sqrt(3)*n^2 / (2*Pi^6). - _Vaclav Kotesovec_, May 31 2019
%t 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 *)
%Y Cf. A029859, A029861.
%K nonn
%O 0,2
%A _N. J. A. Sloane_.
%E a(0) = 1 prepended by _Vaclav Kotesovec_, May 31 2019
%E More terms from _Vaclav Kotesovec_, May 31 2019
|
