A066607 a(n) = 3^n mod n^3.
0, 1, 0, 17, 118, 81, 129, 417, 0, 49, 124, 945, 1498, 177, 1782, 1857, 1958, 729, 3917, 401, 7398, 8721, 6466, 4833, 68, 14049, 0, 3889, 9718, 26649, 24648, 16001, 3294, 6537, 32457, 41553, 34857, 33601, 26703, 32801, 9310, 62721, 76070, 50417, 12393
Offset: 1
Examples
a(7) = 129 as 3^7 = 2187 = (7^3)*6 + 129.
Links
- Harry J. Smith, Table of n, a(n) for n = 1..1000
Crossrefs
Cf. A066606.
Programs
-
Mathematica
Table[ Mod[ 3^n, n^3], {n, 1, 50} ]
-
PARI
a(n) = { lift(Mod(3, n^3)^n) } \\ Harry J. Smith, Mar 10 2010
-
Sage
[power_mod(3,n,n^3)for n in range(1,46)] # Zerinvary Lajos, Nov 28 2009
Extensions
More terms from Floor van Lamoen and Robert G. Wilson v, Dec 23 2001