|
| |
|
|
A038203
|
|
Number of distinct values of factorials mod n.
|
|
2
| |
|
|
1, 2, 3, 3, 4, 3, 5, 4, 5, 5, 6, 4, 10, 6, 5, 5, 12, 5, 12, 5, 6, 7, 17, 4, 8, 11, 8, 7, 19, 5, 21, 6, 8, 13, 7, 6, 26, 13, 11, 5, 29, 6, 26, 8, 6, 18, 31, 5, 11, 8, 13, 12, 35, 8, 9, 7, 14, 20, 37, 5, 41, 22, 7, 8, 13, 8, 42, 14, 18, 7, 39, 6, 44, 27, 8, 15, 11, 11, 49, 6, 9, 30, 55, 7
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
EXAMPLE
| a(15)=9 since factorials are 1, 2, 6, 24, 120, etc. which mod 15 are 1, 2, 6, 9, 0, etc. and so there are 5 distinct values.
|
|
|
MATHEMATICA
| nn=90; With[{frls=Range[nn]!}, Table[Length[Union[Mod[#, n]&/@frls]], {n, nn}]] (* From Harvey P. Dale, Oct 05 2011 *)
|
|
|
CROSSREFS
| Cf. A038204, A062169.
Sequence in context: A053475 A140605 A049878 * A186971 A096827 A063826
Adjacent sequences: A038200 A038201 A038202 * A038204 A038205 A038206
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| David W. Wilson (davidwwilson(AT)comcast.net)
|
| |
|
|
