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 A087496 #19 Aug 19 2025 03:53:33 %S A087496 1,1,5,6,5,5,2,3,7,4,4,2,1,5,1,4,4,2,3,1,5,2,6,0,5,9,9,8,7,4,3,4,1,0, %T A087496 0,4,6,8,4,0,2,1,3,0,7,0,7,1,8,7,6,1,2,9,2,2,3,1,0,6,7,0,7,7,3,8,2,8, %U A087496 6,7,2,2,7,1,5,0,3,5,7,6,6,4,3,9,2,6,5,1,7,9,7,1,8,3,9,2,9,3,4,2 %N A087496 Decimal expansion of Khinchin mean K_{-6}. %C A087496 Khinchin's constant is K_0. %H A087496 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/KhinchinsConstant.html">Khinchin's Constant</a> %e A087496 1.15655237... %t A087496 m = 6; digits = 100; exactEnd = 1000; f[n_] = -(Log[1 - (1 + n)^(-2)]/(n^m*Log[2])); s[n_] = Series[f[n], {n, Infinity, digits}] // Normal // N[#, digits]&; exactSum = Sum[f[n], {n, 1, exactEnd}] // N[#, digits]&; extraSum = Sum[s[n], {n, exactEnd + 1, Infinity}] // N[#, digits]&; (exactSum + extraSum)^(-1/m) // RealDigits[#, 10, digits]& // First (* _Jean-François Alcover_, Feb 14 2013 *) %Y A087496 Cf. A002210, A087491, A087492, A087493, A087494, A087495, A087496, A087497, A087498, A087499, A087500. %K A087496 nonn,cons %O A087496 1,3 %A A087496 _Eric W. Weisstein_, Sep 09 2003 %E A087496 More terms from _Charles R Greathouse IV_, Jul 16 2007 %E A087496 Edited by _Charles R Greathouse IV_, Oct 28 2009 %E A087496 More terms from _Jean-François Alcover_, Feb 14 2013