This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A029872 #27 Apr 28 2024 04:56:18 %S A029872 16,72,288,1200,5376,25480,125504,634608,3269680,17086168,90282240, %T A029872 481347152,2585485504,13974825960,75941188736,414593263952, %U A029872 2272626444528,12502223573304,68996534259040,381858968527680,2118806030647328,11783826597027256,65674579024955904 %N A029872 Low temperature series for spin-1/2 Ising specific heat on 2D square lattice. %D A029872 S. R. Finch, Mathematical Constants, Cambridge, 2003, pp. 391-406. %H A029872 G. A. Baker, <a href="https://doi.org/10.1103/PhysRev.129.99">Further application of the Padé approximant method to the Ising and Heisenberg models</a>, Phys. Rev. 129 (1963) 99-102. %H A029872 I. G. Enting, A, J. Guttmann and I. Jensen, <a href="https://arxiv.org/abs/hep-lat/9410005">Low-Temperature Series Expansions for the Spin-1 Ising Model</a>, arXiv:hep-lat/9410005, 1994; J. Phys. A. 27 (1994) 6987-7006. %H A029872 Steven R. Finch, <a href="http://www.people.fas.harvard.edu/~sfinch/constant/ising/ising.html">Lenz-Ising Constants</a> [broken link] %H A029872 Steven R. Finch, <a href="http://web.archive.org/web/20010207201511/http://www.mathsoft.com:80/asolve/constant/ising/ising.html">Lenz-Ising Constants</a> [From the Wayback Machine] %H A029872 <a href="/index/Sp#specific_heat">Index entries for sequences related to specific heat</a> %F A029872 G.f.: ((u^4 + 30*u^2 + 1) * K(x) / Pi - (u+1)^4 * E(x) / Pi - 2*u*(u+1)^2) / (u^2 * (u^2-1)^2) = 4 * (f(u) * (f'(u)/u + f''(u)) - (f'(u))^2) / f(u)^2, where f(u) is the g.f. of A002890, K(x) and E(x) are the complete elliptic integrals, x = 4*(1-u)*sqrt(u)/(1+u)^2. - _Andrey Zabolotskiy_, Feb 15 2022 %F A029872 a(n) ~ 2 * (1 + sqrt(2))^(2*n+4) / (Pi*n). - _Vaclav Kotesovec_, Apr 28 2024 %t A029872 CoefficientList[Series[1/(Pi*x^2*(-1 + x^2)^2) * (-2*Pi*x*(1 + x)^2 - (1 + x)^4 * EllipticE[16*(-1 + x)^2*x/(1 + x)^4] + (1 + 30*x^2 + x^4) * EllipticK[16*(-1 + x)^2*x/(1 + x)^4]), {x, 0, 25}], x] (* _Vaclav Kotesovec_, Apr 28 2024 *) %Y A029872 Cf. A002890 (partition function). %Y A029872 Equals A029873/4 or A029874*8. %K A029872 nonn %O A029872 0,1 %A A029872 _Steven Finch_ %E A029872 Terms a(18) and beyond from _Andrey Zabolotskiy_, Feb 15 2022