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 A062170 #9 Aug 03 2014 14:31:48
%S A062170 0,1,2,2,4,2,6,6,6,6,10,6,12,10,9,8,16,12,18,6,15,16,22,6,24,24,24,24,
%T A062170 28,24,30,24,27,32,24,24,36,36,33,24,40,36,42,32,30,44,46,24,42,40,48,
%U A062170 48,52,36,45,48,54,52,58,24,60,60,57,56,55,60,66,64,60,50
%N A062170 Maximum value of factorials mod n.
%H A062170 T. D. Noe, <a href="/A062170/b062170.txt">Table of n, a(n) for n = 1..10000</a>
%e A062170 a(15)=9 since factorials are 1, 2, 6, 24, 120, 720, etc. which mod 15 are 1, 2, 6, 9, 0, 0, etc. and the greatest value is 9.
%t A062170 With[{fctrls=Factorial[Range[100]]}, Table[Max[Mod[Take[fctrls,n], n]], {n,100}]] (* _Harvey P. Dale_, Jan 03 2011 *)
%Y A062170 Cf. A062169.
%K A062170 nonn
%O A062170 1,3
%A A062170 _Henry Bottomley_, Jun 11 2001