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 A093651 #5 Mar 14 2024 23:25:22
%S A093651 0,3,7,17,19,64,81,82,90,147,363,546,608,657,819,1459,2747,5880,8296
%N A093651 Where records occur in A093101.
%t A093651 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 A093651 Cf. A093101, A093647.
%K A093651 nonn
%O A093651 0,2
%A A093651 _Robert G. Wilson v_, May 14 2004
%E A093651 Missing 657 inserted by _Sean A. Irvine_, Mar 14 2024