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 A237818 #27 Mar 02 2014 03:21:22 %S A237818 4,3,0,7,9,6,0,4,1,0,6,5,6,3,2,3,2,7,1,9,4,9,0,0,5,4,9,5,4,8,4,5,3,8, %T A237818 4,0,6,8,3,6,5,6,4,7,1,7,2,2,0,4,2,3,4,9,7,5,7,9,8,5,6,0,6,2,6,1,2,6, %U A237818 9,2,0,0,9,4,4,3,3,7,7,8,3,9,5,1,0,7,4,0,5,0,9,6,0,6,8,6,2,3,3,9,3,3,3,3,0,5,5,0,9,6,6 %N A237818 Decimal expansion of b^b^b^..., where b equals Pi-3 (A000796). %e A237818 =0.4307960410656323271949005495484538406836564717220423497579856062612692009443… %t A237818 b = N[Pi - 3, 128]; f[n_] := Nest[b^# &, b, n]; RealDigits[f[1500], 10, 111][[1]] (* Or *) %t A237818 RealDigits[ -LambertW[-Log[Pi - 3]]/Log[Pi - 3], 10, 105][[1]] %Y A237818 Cf. A221566. %K A237818 nonn,cons %O A237818 0,1 %A A237818 _Robert G. Wilson v_, Mar 01 2014