A076944 Least number such that n*k+1 is an n-th power.

2, 9, 64, 81, 7776, 15625, 2097152, 6561, 262144, 3486784401, 743008370688, 244140625, 793714773254144, 3937376385699289, 1152921504606846976, 43046721, 2185911559738696531968, 3814697265625

Offset: 1

Author

Amarnath Murthy, Oct 19 2002

Keywords

• nonn

Comments

a(n) <= {(n+1)^n - 1}/n.

Crossrefs

Cf. A076942, A076943, A074792.

Programs

Mathematica

Do[k = 2; While[ !IntegerQ[(k^n - 1)/n], k++ ]; Print[k^n], {n, 1, 19}]

Formula

a(n) = n*A076943(n) + 1.

Extensions

Edited, corrected and extended by Robert G. Wilson v, Oct 21 2002