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 A084895 #42 Apr 28 2025 07:09:15 %S A084895 1,8,6,3,6,1,6,7,8,3,2,4,4,8,9,6,5,4,2,3,5,5,6,8,9,0,3,1,0,2,4,2,7,0, %T A084895 5,9,5,1,5,7,5,3,2,8,5,6,8,2,6,8,5,3,7,2,2,2,2,0,4,4,1,2,2,6,9,7,8,3, %U A084895 2,5,7,9,4,5,7,9,3,5,7,2,2,3,4,1,2,7,7,7,7,9,6,6,1,4,7,2,7,7,0,9,8,4 %N A084895 Decimal expansion of agm(1, 3), the arithmetic-geometric mean of 1 and 3. %H A084895 Ivan Panchenko, <a href="/A084895/b084895.txt">Table of n, a(n) for n = 1..1000</a> %H A084895 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/Arithmetic-GeometricMean.html">Arithmetic-Geometric Mean</a>. %H A084895 Wikipedia, <a href="https://en.wikipedia.org/wiki/Arithmetic%E2%80%93geometric_mean">Arithmetic-geometric mean</a>. %F A084895 Equals Pi/EllipticK(1/4) = A000796 / A249282. - _Amiram Eldar_, Apr 28 2025 %e A084895 1.8636167832448965423556890310242705951575328568268537222204412269783257945... %p A084895 evalf(GaussAGM(1, 3), 144); # _Alois P. Heinz_, Jul 04 2023 %t A084895 RealDigits[ArithmeticGeometricMean[1, 3], 10, 120][[1]] (* _Vincenzo Librandi_, Mar 12 2015 *) %t A084895 RealDigits[N[Pi/EllipticK[1/4], 102]][[1]] (* _Jean-François Alcover_, Jun 02 2019 *) %o A084895 (PARI) agm(1, 3) \\ _Michel Marcus_, Jun 02 2019 %o A084895 (PARI) Pi/ellK(1/2) \\ _Charles R Greathouse IV_, Feb 04 2025 %Y A084895 Cf. A068521 (agm(1,2)), A084896 (agm(1,4)), A084897 (agm(1,5)), A000796, A249282. %K A084895 nonn,cons,easy %O A084895 1,2 %A A084895 _Eric W. Weisstein_, Jun 10 2003