A175560 (Digit sum of 167^n) mod n.

0, 0, 2, 1, 0, 1, 0, 6, 8, 1, 9, 4, 1, 8, 8, 4, 12, 10, 5, 9, 20, 0, 2, 4, 7, 8, 17, 13, 16, 28, 19, 29, 2, 33, 4, 19, 4, 27, 38, 35, 2, 13, 41, 34, 26, 3, 18, 19, 32, 29, 20, 47, 39, 28, 50, 23, 23, 40, 6, 46, 25, 43, 17, 22, 45, 55, 59, 38, 26, 42, 3, 37, 68, 43, 5, 58, 37, 73, 61, 70, 44, 67, 65, 73, 77, 61, 38, 24, 39, 1, 13, 61, 89, 18, 69, 88, 68, 97, 26, 86, 18, 52, 37, 38, 29, 103, 48, 28, 22, 106, 11, 27, 42, 40, 77, 26, 107, 57, 56, 118

Offset: 1

Author

N. J. A. Sloane, Dec 03 2010

Keywords

• base
• nonn

Crossrefs

Cf. A175558, A175559, A175552.

Programs

Mathematica

Table[Mod[Total[IntegerDigits[167^n]],n],{n,120}] (* Harvey P. Dale, Jul 14 2011 *)