# Greetings from The On-Line Encyclopedia of Integer Sequences! http://oeis.org/ Search: id:a293302 Showing 1-1 of 1 %I A293302 #26 Oct 07 2024 18:08:19 %S A293302 1,1,3,12,66,450,3510,32760,335160,3832920,48648600,673596000, %T A293302 9961736400,161026866000,2775402630000,50713246584000,987048958896000, %U A293302 20331148966128000,440625863806128000,10057578887708352000,240218186856167520000,6010719623406257760000 %N A293302 E.g.f.: Product_{m>0} 1/(1 - x^m + x^(2*m)/2!). %H A293302 Seiichi Manyama, Table of n, a(n) for n = 0..444 %F A293302 a(n) ~ (5*Pi^2/3 - 4*log(2)^2)^(1/4) * n^(n - 1/4) / (4*exp(n - sqrt((5*Pi^2/12 - log(2)^2)*n))). - _Vaclav Kotesovec_, Oct 07 2024 %t A293302 nmax = 25; CoefficientList[Series[1/Product[1 - x^k + x^(2*k)/2, {k, 1, nmax}], {x, 0, nmax}], x] * Range[0, nmax]! (* _Vaclav Kotesovec_, Oct 05 2017 *) %o A293302 (PARI) my(x = 'x + O('x^40)); Vec(serlaplace(prod(m=1, 40, 1/(1 - x^m + x^(2*m)/2!)))) \\ _Michel Marcus_, Oct 05 2017 %Y A293302 Column k=2 of A293301. %Y A293302 Cf. A003105. %K A293302 nonn %O A293302 0,3 %A A293302 _Seiichi Manyama_, Oct 05 2017 # Content is available under The OEIS End-User License Agreement: http://oeis.org/LICENSE