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 A106332 #8 Feb 17 2017 08:37:53 %S A106332 6,4,5,2,2,2,7,0,3,2,3,6,0,2,0,9,7,9,1,3,4,2,5,1,6,6,3,9,4,4,0,2,6,3, %T A106332 3,2,2,5,4,7,2,7,4,4,3,6,4,0,5,7,1,2,2,1,0,7,4,2,2,0,1,8,3,9,0,1,3,6, %U A106332 5,4,6,7,1,5,7,3,9,6,4,9,9,7,2,0,1,4,4,6,9,3,6,9,3,5,0,0,2,6,6,1,3,4,5,5,1 %N A106332 Decimal expansion of the constant x that satisfies: 1 = Sum_{n>=1} x^(n*(n+1)/2). %C A106332 Equals the radius of convergence of the g.f. of A023361 (number of compositions into sums of triangular numbers). %e A106332 1 = x + x^3 + x^6 + x^10 + x^15 + x^21 + x^28 + x^36 + ... %e A106332 x = 0.6452227032360209791342516639440263322547274436405712210742201839013654671 %t A106332 x /. FindRoot[ EllipticTheta[2, 0, Sqrt[x]] == 4*x^(1/8), {x, 1/2}, WorkingPrecision -> 110] // RealDigits[#, 10, 105]& // First (* _Jean-François Alcover_, Feb 13 2013 *) %o A106332 (PARI) solve(x=0.6,0.7,1-sum(n=1,60,x^(n*(n+1)/2))) %Y A106332 Cf. A023361. %K A106332 cons,nonn %O A106332 0,1 %A A106332 _Paul D. Hanna_, Apr 29 2005