A175457 (Digit sum of 6^n) mod n.

0, 1, 0, 2, 2, 3, 1, 4, 0, 6, 1, 9, 10, 12, 3, 6, 4, 0, 6, 12, 18, 19, 3, 18, 15, 21, 18, 6, 19, 27, 6, 30, 27, 33, 30, 18, 24, 21, 6, 11, 3, 27, 24, 21, 27, 42, 21, 9, 15, 21, 12, 15, 4, 9, 52, 50, 27, 55, 48, 3, 24, 39, 36, 60, 10, 27, 33, 3, 36, 42, 66, 54, 33, 57, 63, 51, 75, 36, 51, 39, 45, 60, 1, 27, 15, 21, 27, 15, 48, 0, 69, 84, 27, 51, 39, 54, 94, 66, 45, 42

Offset

1,4

Links

Table of n, a(n) for n=1..100.

Mathematica

Table[Mod[Total[IntegerDigits[6^n]], n], {n, 120}] (* Harvey P. Dale, May 24 2016 *)

Crossrefs

Cf. A000400, A066002, A067864.

Sequence in context: A304270 A318545 A071450 * A322025 A339526 A072078

Adjacent sequences: A175454 A175455 A175456 * A175458 A175459 A175460

Keyword

nonn,base

Author

N. J. A. Sloane, Dec 03 2010

Extensions

Corrected by N. J. A. Sloane, May 23 2016 at the suggestion of Harvey P. Dale.

Status

approved