3,1

The value of (k+1)^n (mod k^n) is in A188699.

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

Table[k = 1; While[r = Mod[(k + 1)^n, k^n]; r == 0 || OddQ[r], k++]; k, {n, 3, 100}]

Sequence in context: A253027 A249384 A228446 * A219604 A296489 A253398

Adjacent sequences: A188886 A188887 A188888 * A188890 A188891 A188892

nonn

T. D. Noe, Apr 12 2011

approved