A066431 a(n) = 9^n mod n^9.
0, 81, 729, 6561, 59049, 531441, 4782969, 43046721, 0, 486784401, 727739626, 3801397473, 7390478182, 5013665073, 26942641524, 68218142337, 50040016962, 127461340881, 20157955560, 179056928801, 95734214766, 798384194161, 812529625653, 123794634177, 1880664942124
Offset: 1
Keywords
Links
- Harry J. Smith, Table of n, a(n) for n = 1..500
Crossrefs
Cf. A066606.
Programs
-
Mathematica
Table[ Mod[ 9^n, n^9], {n, 1, 30} ] Table[PowerMod[9,n,n^9],{n,30}] (* Harvey P. Dale, May 30 2022 *)
-
PARI
a(n) = { lift(Mod(9, n^9)^n) } \\ Harry J. Smith, Feb 13 2010