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 A078975 #11 Jun 06 2016 02:12:34 %S A078975 1,4,1,7,7,4,2,5,4,6,1,8,1,3,8,8,3,1,4,2,8,8,2,9,0,9,1,0,9,9,0,0,0,6, %T A078975 6,2,9,5,3,1,7,9,5,3,2,0,5,7,7,1,7,7,2,5,6,8,8,0,9,1,2,2,1,2,9,6,1,2, %U A078975 9,9,3,2,0,3,7,6,0,5,6,5,0,4,3,5,4,6,6,9,0,8,0,7,3,2,3,3,7,3,8,3,6,2,1,1,1 %N A078975 Decimal expansion of constant C>0 such that sum(k>=1,1/C^(k^2)) = 1. %e A078975 1.417742546... %t A078975 c /. FindRoot[ EllipticTheta[3, 0, 1/c] == 3, {c, 3/2}, WorkingPrecision -> 110] // RealDigits[#, 10, 105]& // First (* _Jean-François Alcover_, Feb 15 2013 *) %o A078975 (PARI) th3(x)=1 + 2*suminf(n=1,x^n^2) %o A078975 solve(x=1.4,2,th3(1/x)-3) \\ _Charles R Greathouse IV_, Jun 06 2016 %K A078975 cons,nonn %O A078975 1,2 %A A078975 _Benoit Cloitre_, Jan 12 2003