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 A093647 #2 Mar 30 2012 17:31:00
%S A093647 1,2,20,130,4000,34385,127658,154375,338143,1462240,22936888,
%T A093647 104087491,756449941,1252467550,3953591108800,110329835126080,
%U A093647 112834800815577880,149099873130116779,26141903882328110417
%N A093647 Records in A093101.
%t A093647 a = {}; b = 0; s = 0; Do[m = n; s = s + 1/n!; If[c = n!/Denominator[s]; c > b, b = c; AppendTo[a, c]; Print[n, " = ", c]], {n, 0, 19622}]
%Y A093647 Cf. A093101, A093651.
%K A093647 nonn
%O A093647 0,2
%A A093647 _Robert G. Wilson v_, May 14 2004