OFFSET
3,1
LINKS
Robert Israel, Table of n, a(n) for n = 3..149
EXAMPLE
For n = 6, the greatest divisor k of 6^7 such that (6^7)/k > 7^6 is 2, so a(6) = (6^7)/2-7^6 = 22319.
MAPLE
f:= proc(n) local a, b, k;
a:= n^(n+1); b:= (n+1)^n;
k:= max(select(t -> a/t >= b, numtheory:-divisors(a)));
a/k-b
end proc:
map(f, [$3..30]);
CROSSREFS
KEYWORD
nonn
AUTHOR
J. M. Bergot and Robert Israel, Jan 05 2021
STATUS
approved