|
| |
|
|
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
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
1,3
|
|
|
LINKS
|
|
|
|
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
|
|
|
|
KEYWORD
|
nonn
|
|
|
AUTHOR
|
|
|
|
STATUS
|
approved
|
| |
|
|
