A070697 Duplicate of A070477.

0, 1, 8, 12, 4, 5, 6, 13, 2, 9, 10, 11, 3, 7, 14, 0, 1, 8, 12, 4, 5, 6, 13, 2, 9, 10, 11, 3, 7, 14, 0, 1, 8, 12, 4, 5, 6, 13, 2, 9, 10, 11, 3, 7, 14, 0, 1, 8, 12, 4, 5, 6, 13, 2, 9, 10, 11, 3, 7, 14, 0, 1, 8, 12, 4, 5, 6, 13, 2, 9, 10, 11, 3, 7, 14, 0, 1, 8, 12, 4, 5, 6, 13, 2, 9, 10, 11, 3, 7, 14

Offset: 0

Author

N. J. A. Sloane, May 13 2002

Keywords

• dead

Comments

a(n)=A070477(n). [Proof: (n^7-n^3) == 0 (mod 15) is shown for n=0 to 14 explicitly. Then binomial expansion of (n+15)^7 and (n+15)^3 extend this by induction n->n+15 to all other indices.] - R. J. Mathar, Oct 30 2009

Crossrefs

Cf. A008960.

Programs

Magma

[n^3 mod 15: n in [0..80]]; // Vincenzo Librandi, Jun 19 2014

Mathematica

Table[Mod[n^3, 15], {n, 0, 100}] (* Vincenzo Librandi, Jun 19 2014 *)

PARI

a(n)=n^7%15 \\ Charles R Greathouse IV, Apr 06 2016