|
|
A289516
|
|
Expansion of 1/j^9 where j is the elliptic modular invariant (A000521).
|
|
7
|
|
|
1, -6696, 23137164, -54962170560, 100898554524030, -152570964293469792, 197804824654438091448, -226001211084270994392576, 232143871270380435422031645, -217638824689267205181123513840, 188440939272259782078293099295972
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
9,2
|
|
LINKS
|
|
|
FORMULA
|
a(n) ~ -(-1)^n * 2^(3*k) * Pi^(12*k) * exp(Pi*sqrt(3)*n) * n^(3*k - 1) / (3^(3*k) * Gamma(1/3)^(18*k) * Gamma(3*k)), set k = 9. - Vaclav Kotesovec, Mar 07 2018
|
|
MATHEMATICA
|
a[n_] := SeriesCoefficient[1/(1728*KleinInvariantJ[-Log[q]*I/(2*Pi)])^9, {q, 0, n}]; Table[a[n], {n, 9, 19}] (* Jean-François Alcover, Nov 02 2017 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
sign
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|