OFFSET
0,4
LINKS
Harry J. Smith, Table of n, a(n) for n=0..100
EXAMPLE
a(7) = 2023 because 7^7 = 2023 (mod 7!).
MATHEMATICA
Table[PowerMod[n, n, n! ], {n, 24}]
PROG
(PARI) for(n=0, 22, print(Mod(n^n, n!)))
(PARI) { for (n=0, 100, write("b063709.txt", n, " ", n^n % n!) ) } \\ Harry J. Smith, Aug 28 2009
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Axel Harvey, Aug 23 2001
EXTENSIONS
Corrected and extended by a number of contributors, Aug 24 2001
STATUS
approved