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 A316229 #14 Jul 09 2018 06:07:17 %S A316229 1,5,8,1,9,7,9,0,2,2,5,3,5,1,7,9,4,6,5,3,7,9,1,4,5,9,9,6,0,6,7,4,3,9, %T A316229 0,4,2,5,3,8,4,5,9,4,0,3,2,2,0,3,8,2,4,8,7,1,7,5,3,1,0,1,7,5,0,8,5,4,6 %N A316229 Decimal expansion of x such that x^x - x^-x = x. %H A316229 Patrick C. Schneider, <a href="/A316229/b316229.txt">Table of n, a(n) for n = 1..10000</a> %e A316229 1.5819790225351794653791459960674390425384... %t A316229 RealDigits[x /. FindRoot[x^x - x^(-x) == x, {x, 1}, WorkingPrecision -> 100]][[1]] (* _Vaclav Kotesovec_, Jul 06 2018 *) %o A316229 (PARI) solve(x=1, 2, x^x-x^-x-x) %Y A316229 Cf. A000312 (x^x). %K A316229 nonn,cons %O A316229 1,2 %A A316229 _Patrick C. Schneider_, Jun 27 2018