|
|
A076944
|
|
Least number such that n*k+1 is an n-th power.
|
|
2
|
|
|
2, 9, 64, 81, 7776, 15625, 2097152, 6561, 262144, 3486784401, 743008370688, 244140625, 793714773254144, 3937376385699289, 1152921504606846976, 43046721, 2185911559738696531968, 3814697265625
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
a(n) <= {(n+1)^n - 1}/n.
|
|
LINKS
|
|
|
FORMULA
|
|
|
MATHEMATICA
|
Do[k = 2; While[ !IntegerQ[(k^n - 1)/n], k++ ]; Print[k^n], {n, 1, 19}]
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|