login
A062170
Maximum value of factorials mod n.
5
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, 28, 24, 30, 24, 27, 32, 24, 24, 36, 36, 33, 24, 40, 36, 42, 32, 30, 44, 46, 24, 42, 40, 48, 48, 52, 36, 45, 48, 54, 52, 58, 24, 60, 60, 57, 56, 55, 60, 66, 64, 60, 50
OFFSET
1,3
EXAMPLE
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.
MATHEMATICA
With[{fctrls=Factorial[Range[100]]}, Table[Max[Mod[Take[fctrls, n], n]], {n, 100}]] (* Harvey P. Dale, Jan 03 2011 *)
CROSSREFS
Cf. A062169.
Sequence in context: A171751 A124676 A076249 * A375386 A307536 A248842
KEYWORD
nonn
AUTHOR
Henry Bottomley, Jun 11 2001
STATUS
approved