login
A001941
Absolute values of coefficients of an elliptic function.
(Formerly M4411 N1864)
7
1, 7, 35, 140, 483, 1498, 4277, 11425, 28889, 69734, 161735, 362271, 786877, 1662927, 3428770, 6913760, 13660346, 26492361, 50504755, 94766875, 175221109, 319564227, 575387295, 1023624280, 1800577849, 3133695747, 5399228149, 9214458260, 15584195428
OFFSET
0,2
REFERENCES
A. Cayley, A memoir on the transformation of elliptic functions, Collected Mathematical Papers. Vols. 1-13, Cambridge Univ. Press, London, 1889-1897, Vol. 9, p. 128.
N. J. A. Sloane, A Handbook of Integer Sequences, Academic Press, 1973 (includes this sequence).
N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).
LINKS
Arthur Cayley, A memoir on the transformation of elliptic functions, Philosophical Transactions of the Royal Society of London (1874): 397-456; Collected Mathematical Papers. Vols. 1-13, Cambridge Univ. Press, London, 1889-1897, included in Vol. 9. [Annotated scan of pages 126-129]
Simon Plouffe, Numbers in the base e^Pi, arXiv:2509.15609 [math.NT], 2025. See p. 15/24, marked 12.
FORMULA
G.f.: Product ( 1 - x^k )^-c(k), c(k) = 7, 7, 7, 0, 7, 7, 7, 0, ....
a(n) ~ 7^(1/4) * exp(sqrt(7*n/2)*Pi) / (256*2^(3/4)*n^(3/4)). - Vaclav Kotesovec, Nov 15 2017
G.f.: Product_{k>=1} ((1 + x^(2*k))/(1 - x^(2*k-1)))^7. - Ilya Gutkovskiy, Dec 04 2017
Empirical: Sum_{n>=0} a(n) / exp(n*Pi) = (1/16) * exp(7*Pi/8) * sqrt(2) = A388100. - Simon Plouffe, Sep 14 2025
MATHEMATICA
nn = 4*10; b = Flatten[Table[{7, 7, 7, 0}, {nn/4}]]; CoefficientList[x*Series[Product[1/(1 - x^m)^b[[m]], {m, nn}], {x, 0, nn}], x] (* T. D. Noe, Aug 17 2012 *)
nmax = 40; CoefficientList[Series[Product[((1 - x^(4*k)) / (1 - x^k))^7, {k, 1, nmax}], {x, 0, nmax}], x] (* Vaclav Kotesovec, Nov 15 2017 *)
KEYWORD
nonn
STATUS
approved