A289565 Coefficients in expansion of 1/E_2^(1/2).
1, 12, 252, 5664, 133356, 3224952, 79387488, 1978996416, 49797787788, 1262193008556, 32177428972632, 824182154521056, 21193138994244960, 546767126418119352, 14146104826919725632, 366887630982365262144, 9535791498480146879436
Offset: 0
Keywords
Links
- Seiichi Manyama, Table of n, a(n) for n = 0..701
Crossrefs
Programs
-
Mathematica
nmax = 20; CoefficientList[Series[(1 - 24*Sum[DivisorSigma[1, k]*x^k, {k, 1, nmax}])^(-1/2), {x, 0, nmax}], x] (* Vaclav Kotesovec, Jul 09 2017 *)
Formula
G.f.: Product_{n>=1} (1-q^n)^(-A288968(n)/2).
a(n) ~ c / (sqrt(n) * r^n), where r = A211342 = 0.03727681029645165815098078565... is the root of the equation Sum_{k>=1} A000203(k) * r^k = 1/24 and c = 0.535261044779387956394739769118415667289349331646288208543596374426... - Vaclav Kotesovec, Jul 09 2017