|
|
A289392
|
|
Coefficients in expansion of E_2^(1/4).
|
|
10
|
|
|
1, -6, -72, -1104, -20238, -405792, -8601840, -189317568, -4281478272, -98841343686, -2318973049008, -55118876238000, -1324194430710912, -32099173821105312, -784045854628721568, -19276683937074656064, -476644852188898489662
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
LINKS
|
|
|
FORMULA
|
G.f.: Product_{n>=1} (1-q^n)^A289394(n).
a(n) ~ c / (n^(5/4) * 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.209452682241344640265132676904094736935029272937832600102950644347... - Vaclav Kotesovec, Jul 08 2017
G.f.: Sum_{k>=0} A004984(k) * (3*f(q))^k where f(q) is Sum_{k>=1} sigma_1(k)*q^k. - Seiichi Manyama, Jun 16 2018
|
|
MATHEMATICA
|
nmax = 20; CoefficientList[Series[(1 - 24*Sum[DivisorSigma[1, k]*x^k, {k, 1, nmax}])^(1/4), {x, 0, nmax}], x] (* Vaclav Kotesovec, Jul 08 2017 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
sign
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|