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 A125579 #5 Apr 16 2014 08:57:12 %S A125579 8,6,5,4,7,4,0,3,3,1,0,1,6,1,4,4,4,6,6,2,0,6,8,5,9,0,1,1,8,6,2,2,8,7, %T A125579 4,7,7,9,2,9,1,1,9,3,1,8,1,8,9,3,5,5,0,0,8,8,9,2,7,9,9,1,5,8,5,5,4,4, %U A125579 7,0,0,6,0,5,6,0,2,1,5,6,0,5,1,4,0,6,4,2,7,2,3,1,9,5,6,2,8,0,2,2,8,0 %N A125579 Decimal expansion of positive root of x^3 = cos(x). %F A125579 x^3 = cos(x) %e A125579 0.865474033101614446620685901186228747792911931818935... %t A125579 RealDigits[FindRoot[Cos[x] == x^3, {x, {.7, 1}}, WorkingPrecision -> 120][[1, 2, 1]], 10, 111][[1]] %o A125579 (PARI) solve(x=0,1,cos(x)-x^3) \\ _Charles R Greathouse IV_, Apr 16 2014 %Y A125579 Cf. A003957, A124597. %K A125579 cons,nonn %O A125579 0,1 %A A125579 Denton J. Dailey (djd1497(AT)aol.com), Jan 03 2007