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 A095228 #6 Jul 24 2015 23:26:19 %S A095228 0,0,0,6,6,3,8,4,0,5,5,5,7,5,7,4,7,1,6,2,1,9,8,3,1,0,0,0,0,0,0,0,0,0, %T A095228 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, %U A095228 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 %N A095228 n-th decimal digit of 1/n!. %C A095228 Since n! grows faster than 10^n, eventually the entries become 0. This occurs at a(25). %e A095228 a(7) = 4, 1/7! = 1/5040 = 0.0001984126984126984126984126984127... and the seventh digit after the decimal point is 4. %t A095228 f[n_] := Block[{d = RealDigits[1/n!, 10, 155]}, e = d[[2]]; If[ Max[1, n] > -e, d[[1, Max[1, n] + e]], 0]]; Table[ f[n], {n, 0, 104}] (* _Robert G. Wilson v_, Jun 12 2004 *) %Y A095228 Cf. A086824. %K A095228 base,easy,nonn %O A095228 0,4 %A A095228 _Amarnath Murthy_, Jun 11 2004 %E A095228 Edited, corrected and extended by _Robert G. Wilson v_, Jun 12 2004