login
A066431
a(n) = 9^n mod n^9.
1
0, 81, 729, 6561, 59049, 531441, 4782969, 43046721, 0, 486784401, 727739626, 3801397473, 7390478182, 5013665073, 26942641524, 68218142337, 50040016962, 127461340881, 20157955560, 179056928801, 95734214766, 798384194161
OFFSET
1,2
LINKS
MATHEMATICA
Table[ Mod[ 9^n, n^9], {n, 1, 30} ]
Table[PowerMod[9, n, n^9], {n, 30}] (* Harvey P. Dale, May 30 2022 *)
PROG
(PARI) { for (n=1, 500, write("b066431.txt", n, " ", 9^n % n^9) ) } \\ Harry J. Smith, Feb 13 2010
CROSSREFS
Sequence in context: A090257 A295233 A271829 * A206086 A356534 A224002
KEYWORD
nonn
AUTHOR
Robert G. Wilson v, Dec 27 2001
STATUS
approved