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 A098687 #8 Mar 09 2014 13:47:02 %S A098687 1,7,5,1,8,2,8,8,8,4,3,1,3,8,4,1,7,8,0,4,1,3,3,2,7,6,3,7,6,4,1,6,7,6, %T A098687 3,4,8,1,2,2,4,1,2,1,6,1,2,9,4,5,2,6,3,6,0,7,4,1,0,7,0,4,5,1,4,9,9,8, %U A098687 3,8,3,9,6,5,9,2,3,7,5,5,1,0,3,3,6,9,1,5,1,0,3,9,4,8,6,8,4,3,1,5,6,6,3,4,1 %N A098687 Decimal expansion of Integral_{x=0..infinity} x/(x^x) dx. %C A098687 Decimal expansion of G(b)-G(a), where b->infinity, a->0+ and G(x) is the antiderivative of x/(x^x). %e A098687 1.75182888431384178041332763764167634812241216129452636074107045149... %p A098687 int(x/(x^x),x=0..infinity); %t A098687 $MaxPrecision = 10^7; RealDigits[ NIntegrate[x/x^x, {x, 0, Infinity}, WorkingPrecision -> 256, PrecisionGoal -> 128, MaxRecursion -> 16], 10, 111][[1]] (* _Robert G. Wilson v_, Nov 02 2004 *) %t A098687 RealDigits[N[Integrate[x/x^x,{x,0,\[Infinity]}],120]][[1]] (* _Harvey P. Dale_, Dec 20 2012 *) %K A098687 cons,nonn %O A098687 1,2 %A A098687 Joseph Biberstine (jrbibers(AT)indiana.edu), Oct 27 2004 %E A098687 More terms from _Robert G. Wilson v_, Nov 03 2004