A070721 Duplicate of A070502.

0, 1, 8, 27, 24, 5, 16, 23, 32, 9, 0, 11, 8, 37, 24, 15, 16, 33, 32, 19, 0, 21, 8, 7, 24, 25, 16, 3, 32, 29, 0, 31, 8, 17, 24, 35, 16, 13, 32, 39, 0, 1, 8, 27, 24, 5, 16, 23, 32, 9, 0, 11, 8, 37, 24, 15, 16, 33, 32, 19, 0, 21, 8, 7, 24, 25, 16, 3, 32, 29, 0, 31, 8, 17, 24, 35, 16

Offset

0,3

Comments

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

Links

Table of n, a(n) for n=0..76.

Mathematica

PowerMod[Range[0, 100], 7, 40] (* Harvey P. Dale, Aug 21 2012 *)

Prog

(Sage) [power_mod(n, 7, 40)for n in range(0, 77)] # - Zerinvary Lajos, Oct 29 2009
(PARI) a(n)=n^7%40 \\ Charles R Greathouse IV, Apr 06 2016

Crossrefs

Sequence in context: A070504 A070503 A070502 * A070501 A070500 A100499

Adjacent sequences: A070718 A070719 A070720 * A070722 A070723 A070724

Keyword

dead

Author

N. J. A. Sloane, May 13 2002

Status

approved